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Preface 



This manual is the first in a series of two volumes. The reference 
information contained in these two manuals is provided as a DOS/VS 
serviceability aid and is, therefore, a summary of other DOS/VS 
documentation. These manuals are intended for use by persons 
involved in program support. 

The two volumes contain the following information: 

- Volume 1.SY33-8571: 

Chapter I : System/370 General Information 
II : DOS/VS General Information 
III: DOS/VS IOCS (General. SAM, DAM. ISAM) 
IV: DOS/VS Supervisor Control Blocks and Areas 
V : DOS/VS Service Aids 



Volum. 


.'2.SY33-8572: 


Chapte 


r I : POWER/VS 




II : VTAM Control Blocks 




III: VSAM Control Blocks 




IV: Model 20 Emulator 




V : 14xx Emulator 




VI: BTAM 



If there is any discrepancy between the information contained ir 
this manual and the DOS/VS optional programming material 
(e.g., PLMs and listings), the latter is assumed to be correct. 



Fifth Edition (November, 1975) 

This is a major revision of, and obsoletes, SY33-857 1-3. It 
applies to Version 5, Release 32, of the IBM Disk Operating 
System/Virtual Storage, DOS/VS, and to all subsequent versions 
and releases until otherwise indicated in new editions or Technical 
Newsletters. Changes are continually made to the information 
herein; before using this publication in connection with the 
operation of IBM systems, consult the latest System/370 Bibliography, 
GC20-0001 , for the editions that are applicable and current. 

Requests for copies of IBM publications should be made to your 
IBM representative or to the IBM branch office serving your locality. 

A handbook-sized binder, FE Part Number 453559, may be 
purchased from IBM. Customers may order it through their IBM 
marketing rcpresentathe. IBM personnel should order it as an 
FE part from Mechanicsburg. 

This manual has been prepared by WT-DP/CE Technical Operations, 
Uithoorn, Dept. 265, P.O. Box 24, Uithoorn, The Netherlands. 

A form for readers' comments is provided at the back of this 
publication. If the form has been removed, comments may be sent 
to the above address. Comments become the property of IBM. 
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CHAPTER I 

SYSTEM 370 GENERAL INFORMATION 




MACHINE INSTRUCTIONS 



Name 


Mne- 
monic 


Coje 


Format 


Operands 


Add (c) 


AR 


1A 


RR 


R1,R2 


Add (c) 


A 


5A 


RX 


R1,D2(X2,B2) 


Add Decimal (c) 


AP 


TA 


SS 


D1(L1,B1),D2(L2,B2) 


Add Halfword (c) 


AH 


4A 


RX 


R1,D2(X2,B2) 


Add Logical (c) 


ALR 


IE 


RR 


R1,R2 


Add Logical (c) 


AL 


5E 


RX 


R1,D2(X2,B2) 


AND (c) 


NR 


14 


RR 


R1,R2 


AND (c) 


N 


54 


RX 


R1,D2(X2,B2) 


AND (c) 


Nl 


94 


SI 


D1(B1),12 


AND (c) 


NC 


D4 


SS 


D1(L,B1),D2(B2) 


Branch and Link 


BALR 


05 


RR 


R1,R2 


Branch and Link 


BAL 


45 


RX 


R1,D2(X2,B2) 


Branch on Condition 


BCR 


07 


RR 


M1,R2 


Branch on Condition 


BC 


47 


RX 


M1,D2(X2,B2) 


Branch on Count 


BCTR 


06 


RR 


R1,R2 


Branch on Count 


BCT 


46 


RX 


R1,D2(X2,B2) 


Branch on Index High 


BXH 


86 


RS 


R1,R3,D2(B2) 


Branch on Index Low or Equal 


BXLE 


87 


RS 


R1,R3,D2(B2) 


Clear I/O 


CLRIO 


9D01 


S 


D2(B2) 


Compare (c) 


CR 


19 


RR 


R1,R2 


Compare (c) 


C 


59 


RX 


R1,D2(X2,B2) 


Compare and Swap 


CS 


BA 


RS 


R1,R3,D2,(B2) 


Compare Decimal (c) 


CP 


F9 


SS 


D1(L1,B1),D2(L2,B2) 


Compare Double and Swap 


CDS 


BB 


RS 


R1,R3,D2,(B2) 


Compare (c) 


CR 


19 


RR 


R1,R2 


Compare (c) 


C 


59 


RX 


R1,D2(X2,B2) 


Compare Decimal (c) 


CP 


F9 


SS 


D1(L1,B1),D2(L2,B2) 


Compare Halfword (c) 


CH 


49 


RX 


R1,D2(X2,B2) 


Compare Logical (c) 


CLR 


15 


RR 


R1,R2 


Compare Logical (c) 


CL 


55 


RX 


R1,D2(X2,B2) 


Compare Logical (c) 


CLC 


D5 


SS 


D1,(L,B1),D2(B2) 


Compare Logical (c) 


CLI 


95 


SI 


D1(B1),I2 


Compare Logical Characters 


CLM 


BD 


RS 


R1,M3,D2(B2) 


under Mask (c) 










Compare Logical Long (c) 


CLCL 


OF 


RR 


R1,R2 


Convert to Binary 


CVB 


4F 


RX 


R1,D2(X2,B2) 


Convert to Decimal 


CVD 


4E 


RX 


R1,D2(X2,B2) 


Diagnose (p) 




83 


SI 




Divide 


DR 


ID 


RR 


R1,R2 


Divide 


D 


5D 


RX 


R1,D2(X2,B2) 


Divide Decimal 


DP 


FD 


SS 


D1(L1,B1),D2(L2,B2) 


Edit (c) 


ED 


DE 


SS 


D1(L,B1),D2(B2) 


Edit and Mark (c) 


EDMK 


DF 


SS 


D1(L,B1),D2(B2) 


Exclusive OR (c) 


XR 


17 


RR 


RI,R2 


Exclusive OR (c) 


X 


57 


RX 


R1,D2(X2,B2) 


Exclusive OR (c) 


XI 


97 


SI 


D1(B1),I2 


Exclusive OR (c) 


XC 


D7 


SS 


D1(L,B1),D2(B2) 


Execute 


EX 


44 


RX 


R1,D2(X2,B2) 


Halt I/O (c,p) 


HIO 


9E00 


S 


D1(B1) 


Halt Device (c,p) 


HDV 


9E01 


S 


D1(B1) 


Insert Character 


IC 


43 


RX 


R1,D2(X2,B2) 


Insert Characters under Mask (c) 


ICM 


BF 


RS 


R1,M3,D2(B2) 


Insert Storage Key (p) 


ISK 


09 


RR 


R1,R2 


Load 


LR 


18 


RR 


R1,R2 


Load 


L 


58 


RX 


R1,D2(X2,B2) 


Load Address 


LA 


41 


RX 


R1,D2(X2,B2) 


Load and Test (c) 


LTR 


12 


RR 


R1,R2 


Load Complement (c) 


LCR 


13 


RR 


R1,R2 


Load Control (p) 


LCTL 


B7 


RS 


R1,R3,D2(B2) 


Load Halfword 


LH 


48 


RX 


R1,D2(X2,B2) 


Load Multiple 


LM 


98 


RS 


R1,R3,D2(B2) 


Load Negative (c) 


LNR 


11 


RR 


R1,R2 



MACHINE INSTRUCTIONS (....Cont'd) 



Name 


Mne- 


Code 


Formal 


\ Operands 


Load Positive (c) 


LPR 


10 


RR 


R1,R2 


Load PSW(n,p) 


LPSW 


82 


SI 


D1(B1) 


Load Real Address (c,p) 


LRA 


Bl 


RX 


R1,D2(X2,B2) 


Monitor Call (m) 


MC 


AF 


SI 


D1(B1),I2 


Move 


MVI 


92 


SI 


D1(B1), 12 


Move 


MVC 


D2 


SS 


D1(L,B1),D2(B2) 


Move Long (c) 


MVCL 


0E 


RR 


R1,R2 


Move Numerics 


MVN 


Dl 


SS 


D1(L,B1),D2(B2) 


Move with Offset 


MVO 


Fl 


SS 


D1(L1,B1),D2(L2,B2) 


Move Zones 


MVZ 


D3 


SS 


D1(L,B1),D2(B2) 


Multiply 


MR 


1C 


RR 


R1,R2 


Multiply 


M 


5C 


RX 


R1,D2(X2,B2) 


Multiply Decimal 


MP 


FC 


SS 


D1(L1,B1),D2(L2,B2) 


Multiply Halfword 


MH 


4C 


RX 


R1,D2(X2,B2) 


OR(c) 


OR 


16 


RR 


R1,R2 


OR (c) 


O 


56 


RX 


R1,D2(X2,B2) 


OR(c) 


Ol 


96 


SI 


D1(B1),I2 


OR (c) 


OC 


D6 


SS 


D1(L,B1),D2(B2) 


Pack 


PACK 


F2 


SS 


D1(L1,B1),D2(L2,B2) 


Purge Table (p) 


PTLB 


B20D 


S 




Read Direct (a,p) 


RDD 


85 


SI 


D1(B1),I2 


Reset Reference Bit (c,p) 


RRB 


B213 


S 


D1(B1) 


Set Clock (c,p) 


SCK 


B204 


S 


D1(B1) 


Set Clock Comparator (p) 


SCKC 


B206 


S 


D1(B1) 


Set CPU Timer (p) 


SPT 


B208 


S 


D1(B1) 


Set Program Mask (n) 


SPM 


04 


RR 


Rl 


Set Storage Key (p) 


SSK 


08 


RR 


R1,R2 


Set System Mask (p) 


SSM 


80 


SI 


D1(B1) 


Shift and Round Decimal (c) 


SRP 


F0 


SS 


D1(L1,B1),D2(B2),I3 


Shift Left Double (c) 


SLDA 


8F 


RS 


R1,D2(B2) 


Shift Left Double Logical 


SLDL 


8D 


RS 


R1,D2(B2) 


Shift Left Single (c) 


SLA 


8B 


RS 


R1,D2(B2) 


Shift Left Single Logical 


SLL 


89 


RS 


R1,D2(B2) 


Shift Right Double (c) 


SRDA 


8E 


RS 


R1,D2(B2) 


Shift Right Double Logical 


SRDL 


8C 


RS 


R1,D2(B2) 


Shift Right Single (c) 


SRA 


8A 


RS 


R1,D2(B2) 


Shift Right Single Logical 


SRL 


88 


RS 


R1,D2(B2) 


Start I/O (c,p) 


SIO 


9C00 


S 


D1(B1) 


Start I/O Fast Release (c,p) 


SIOF 


9C01 


S 


D1(B1) 


Store 


ST 


50 


RX 


R1,D2(X2,B2) 


Store Channel ID (c,p) 


STIDC 


B203 


S 


D1(B1) 


Store Character 


STC 


42 


RX 


R1,D2(X2,B2) 


Store Characters under Mask 


STCM 


BE 


RS 


R1,M3,D2(B2) 


Store Clock (c) 


STCK 


B205 


S 


D1(B1) 


Store Clock Comparator (p) 


STCKC 


B207 


S 


D1(B1) 


Store Control (p) 


STCTL 


B6 


RS 


R1,R3,D2(B2) 


Store CPU ID (p) 


STIDP 


B202 


S 


D1(B1) 


Store CPU Timer (p) 


STPT 


B209 


S 


D1(B1) 


Store Halfword 


STH 


40 


RX 


R1,D2(X2,B2) 


Store Multiple 


STM 


90 


RS 


R1,R3,D2(B2) 


Store then AND System Mask (p] 


) STNSM 


AC 


SI 


D1(B1),I2 


Store then OR System Mask (p) 


STOSM 


AD 


SI 


D1(B1),I2 


Subtract (c) 


SR 


IB 


RR 


R1,R2 


Subtract (c) 


S 


5B 


RX 


R1,D2(X2,B2) 


Subtract Decimal (c) 


SP 


FB 


SS 


D1(L1,B1),D2(L2,B2) 


Subtract Halfword (c) 


SH 


4B 


RX 


R1,D2(X2,B2) 


Subtract Logical (c) 


SLR 


IF 


RR 


R1,R2 


Subtract Logical (c) 


SL 


5F 


RX 


R1,D2(X2,B2) 


Supervisor Call 


SVC 


0A 


RR 


1 


Test and Set (c) 


TS 


93 


SI 


D1(B1) 



MACHINE INSTRUCTIONS (. . . .Cont'd) 



Name 


Mne- 
monic 


Op 
Code 


Format 


Operands 


Test Channel (c,p) 


TCH 


9F 


SI 


D1(B1) 


Test I/O (c,p) 


TIO 


9D 


SI 


D1(B1) 


Test under Mask (c) 


TM 


91 


SI 


D1(B1),I2 


Translate 


TR 


DC 


SS 


D1(L,31),D2(B2) 


Translate and Test (c) 


TRT 


DD 


SS 


D1(L,B1),D2(B2) 


Unpack 


UNPK 


F3 


SS 


D1(L1,B1),D2(L2,B2) 


Write Direct (a,p) 


WRD 


84 


SI 


D1(B1),I2 


Zero and Add Decimal (c) 


ZAP 


F8 


SS 


D1(L1,B1),D2(L2,B2) 


Floating Point Instructions 










Name 


Mne- 


Op 
CoJe 


Format 


Operands 


Add Normalized, Extended (c,x 


AXR 


36 


RR 


R1,R2 


Add Normalized, Long (c) 


ADR 


2A 


RR 


R1,R2 


Add Normalized, Long (c) 


AD 


6A 


RX 


R1,D2(X2,B2) 


Add Normalized, Short (c) 


AER 


3A 


RR 


R1,R2 


Add Normalized, Short (c) 


AE 


7A 


RX 


R1,D2(X2,B2) 


Add Unnormalized, Long (c) 


AWR 


2E 


RR 


R1,R2 


Add Unnormalized, Long (c) 


AW 


6E 


RX 


R1,D2(X2,B2) 


Add Unnormalized, Short (c) 


AUR 


3E 


RR 


R1,R2 


Add Unnormalized, Short (c) 


AU 


7E 


RX 


R1,D2(X2,B2) 


Compare, Long (c) 


CDR 


29 


RR 


R1,R2 


Compare, Long (c) 


CD 


69 


RX 


R1,D2(X2,B2) 


Compare, Short (c) 


CER 


39 


RR 


R1,R2 


Compare, Short (c) 


CE 


79 


RX 


R1,D2(X2,B2) 


Divide, Long 


DDR 


2D 


RR 


R1,R2 


Divide, Long 


DD 


6D 


RX 


R1,D2(X2,B2) 


Divide, Short 


DER 


3D 


RR 


R1,R2 


Divide, Short 


DE 


7D 


RX 


R1,D2(X2,B2) 


Halve, Long 


HDR 


24 


RR 


R1,R2 


Halve, Short 


HER 


34 


RR 


R1,R2 


Load and Test, Long (c) 


LTDR 


22 


RR 


R1,R2 


Load and Test, Short (c) 


LTER 


32 


RR 


R1,R2 


Load Complement, Long (c) 


LCDR 


23 


RR 


R1,R2 


Load Complement, Short (c) 


LCER 


33 


RR 


R1,R2 


Load, Long 


LDR 


28 


RR 


R1,R2 


Load, Long 


LD 


68 


RX 


R1,D2(X2,B2) 


Load Negative, Long (c) 


LNDR 


21 


RR 


R1,R2 


Load Negative, Short (c) 


LNER 


31 


RR 


R1,R2 


Load Positive, Long (c) 


LPDR 


20 


RR 


R1,R2 


Load Positive, Short (c) 


LPER 


30 


RR 


R1,R2 


Load Rounded, Extended to Long^x) LRDR 


25 


RR 


R1,R2 


Load Rounded, Long to Short (x) 


LRER 


35 


RR 


R1,R2 


Load, Short 


LER 


38 


RR 


R1,R2 


Load, Short 


LE 


78 


RX 


R1,D2(X2,B2) 


Multiply, Extended (x) 


MXR 


26 


RR 


R1,R2 


Multiply, Long 


MDR 


2C 


RR 


R1,R2 


Multiply, Long 


MD 


6C 


RX 


R1,D2(X2,B2) 


Multiply, Long/Extended (x) 


MXDR 


27 


RR 


R1,R2 


Multiply, Long/Extended (x) 


MXD 


67 


RX 


R1,D2(X2,B2) 


Multiply, Short 


MER 


3C 


RR 


R1,R2 


Multiply, Short 


ME 


7C 


RX 


R1,D2(X2,B2) 


Store ,Long 


STD 


60 


RX 


R1,D2(X2,B2) 


Store, Short 


STE 


70 


RX 


R1,D2(X2,B2) 


Subtract Normalized, Ext 'd (c,x 


SXR 


37 


RR 


R1,R2 


Subtract Normalized, Long (c) 


SDR 


2B 


RR 


R1.R2 


Subtract Normalized, Long (c) 


SD 


6B 


RX 


R1,D2(X2,52) 



MACHINE INSTRUCTIONS (....Cont'd) 
Floating Point Instructions ( Cont'd) 



Subtract Normalized, Short (c) 
Subtract Normalized, Short (c) 
Subtract Unnormalized,Long (c) 
Subtract Unnormalized,Long (c) SW 
Subtract Unr.ormalized,Short (c) 
Subtract Unnormalized, Short (c) 



rntnlc 


Op 
Code 


Format 


Operands 


SER 


3B 


RR 


R1,R2 


SE 


7B 


RX 


R1,D2(X2,B2) 


SWR 


2F 


RR 


R1,R2 


SW 


6F 


RX 


R1,D2(X2,B2) 


SUR 


3F 


RR 


R1,R2 


SU 


7? 


RX 


R1,D2(X2,B2) 



(a) Direct Control Feature (n) New Condition Code is loaded 


(c) Condition Code is set 


(p) Privileged Instruction 


(m) Monitoring Feature 


(x) Extended precis ioi 


floating point feature 


EXTENDED MNEMONIC INSTRUCTION CODES 




GENERAL 






Extended Code 


Machine instruction 


Meaning 


B D2(X2,B2) 


BC 15, D2(X2,B2) 


Branch Unconditionally 


BR R2 


BCR 15, R2 


Branch Unconditionally 


NOP D2(X2,B2) 


BC 0, D2(X2,B2) 


No Operation 


NOPR R2 


BCR 0, R2 


No Operation (RR) 


AFTER COMPARE INSTRUCTIONS (A:B) 




BH D2(X2,B2) 


BC2, D2(X2,B2) 


Branch on A High 


BL D2(X2,B2) 


BC 4, D2(X2,B2) 


Branch on A Low 


BE D2(X2,B2) 


BC 8, D2(X2,B2) 


Branch on A equal B 


BNH D2(X2,B2) 


BC 13, D2(X2,B2) 


Branch on A not High 


BNL D2(X2,B2) 


BC 11, D2(X2,B2) 


Branch on A not Low 


BNE D2(X2,B2) 


BC 7, D2(X2,B2) 


Branch on A not Equal B 


AFTER ARITHMATIC INSTRUCTIONS 




BO D2(X2,B2) 


BC 1, D2(X2,B2) 


Branch on Overflow 


BP D2(X2,B2) 


BC2, D2(X2,B2) 


Branch on Plus 


BM D2(X2,B2) 


BC4, D2(X2,B2) 


Branch on Minus 


BZ D2(X2,B2) 


BC8, D2(X2,B2) 


Branch on Zero 


BNP D2(X2,B2) 


BC 13, D2(X2,B2) 


Branch on not Plus 


BNM D2(X2,B2) 


BC 11, D2(X2,B2) 


Branch on not Minus 


BNZ D2(X2,B2) 


BC 7, D2(X2,B2) 


Branch on not Zero 


AFTER TEST UNDER MASK INSTRUCTIONS 




BO D2(X2,B2) 


BC 1, D2(X2,B2) 


Branch if Ones 


BM D2(X2,B2) 


BC 4, D2(X2,B2) 


Branch if Mixed 


BZ D2(X2,B2) 


BC8. D2(X2,B2) 


Branch if Zero's 


BNO D2(X2,B2) 


BC 14, D2(X2,B2) 


Branch if not Ones 



CNOP ALIGNMENT 



Double Word 


Word 


Word 


Half Word | Half Word 


Half Word | Half Word 


Byte : Byte \ Byte : Byte j Byte j Byte ; Byte ! Byte 


6~4 2A O 2^ 

0,9 2,8 4,8 6,8 



EDIT AND EDMK PATTERN CHARACTERS (In Hex) 



20 - Digit selector 




40 - Blank 5C - Aterisk 


21 - Start of significance 


4B - Period 6B - Comma 


22 - Field separator 




5B - Dollar sign C3D9-CR 


ASSEMBLER INSTRUCTIONS 




Function 


Mnemonic 


Meaning 


Data Definition 


DC 


Define Constant 




DS 


Define Storage 




CCW 


Define Channel Command Word 


Program Sectioning 


START 


Start Assembly 


and Linking 


CSECT 


Identify Control Section 




DSECT 


Identify Dummy Section 




COM 


Identify blank common Control Secti 




ENTRY 


Identify Entry Point Symbol 




EXTRN 


Identify External Symbol 




WXTRN 


Identify weak External Symbol 


Base Register 


USING 


Use Base Address Register 


Assignment 


DROP 


Drop Base Address Register 


Control of listings 


TITLE 


Identify Assembly Output 




EJECT 


Start new Page 




SPACE 


Space Listing 




PRiNT 


Print Optional Data 


Program Control 


ICTL 


Input Format Control 




ISEQ 


Input Sequence Checking 




PUNCH 


Punch a Card 




REPRO 


Reproduce following Card 




ORG 


Set Location Counter 




EQU 


Equate Symbol 




LTORG 


Begin Literal Pool 




CNOP 


Conditional No-Operation 




COPY 


Copy predefined Source Coding 




END 


End Assembly 


Macro Definition 


MACRO 


Macro Definition Header 




MNOTE 


Request for Error Message 




MEXIT 


Macro Definition Exit 




MEND 


Macro Definition Trailer 


Conditional 


ACTR 


Conditional Assembly Loop Counter 


Assembly 


AGO 


Unconditional Branch 




AIF 


Conditional Branch 




ANOP 


Assembly No-Operation 




GBLA 


Define global SETA Symbol 




GBLB 


Define global SETB Symbol 




GBLC 


Define global SETC Symbol 




LCLA 


Define local SETA Symbol 




LCLB 


Define local SETB Symbol 




LCLC 


Define local SETC Symbol 




SETA 


Set Arithmetic Variable Symbol 




SETB 


Set Arithmetic 




SETC 


Set Character Variable Symbol 



SUMMARY OF CONSTANTS 



Type 


Implied 
Bytes 


Alignment 


F °™' 


Truncation 
Padding 


C 


_ 


Byte 


Characters 


Right 


X 


_ 


Byte 


Hexadecimal Digits 


Left 


B 


_ 


Byte 


Binary Digits 


Left 


F 


4 


Word 


Fixed-point Binary 


Left 


H 


2 


Halfword 


Fixed-point Binary 


Left 


E 


4 


Word 


Short Floating-point 


Right 


D 


8 


Doubleword 


Long Floating-point 


Right 


L 


16 


Doubleword 


Extended Floating-point 


Right 


P 


_ 


Byte 


Packed Decimal 


Left 


Z 


_ 


Byte 


Zoned Decimal 


Left 


A 


4 


Word 


Value of Address 


Left 


Y 


2 


Halfword 


Value of Address 


Left 


S 


2 


Halfword 


Address in Base-Displacement form 


- 


V 


4 


Word 


Externally defined Address Value 


Left 



CONDITION CODES 

Condition Code Setting 

Mask Bit Position 8 

Floating Point Arithmetic 



Add H/F/Dec. 
Add Logical 

Compare H/F/Dec. (A:B) 

Compare and Swap/Double 

Load and Test 

Load Complement 

Load Negative 

Load Positive 

Shift and Round Decimal 

Shift Left Single/Double 

Shift Right Single/Double 

Subtract H/F/Dec. 

Subtract Logical 

Zero and Add 



zero, 
no carry 
equal 
equal 
zei 



not zero, 

no carry 

A low 

not equal 
<zero 
<zero 
<zero 

<zero 

<zero 

<zero 

<zero 
not zero, 
no carry 



Add Normalized S/L/E 


zero 


<zero 


>zero 


Add Unnormalized S/L 


zero 


<zero 


>zero 


Compare S/L (A:B) 


equal 


A low 


A high 


Load and Test S/L 


zero 


<zero 


>zero 


Load Complement S/L 


zero 


<zero 


>zero 


Load Negative S/L 


zero 


<zero 


- 


Load Positive S/L 


zero 


- 


>zero 


Subtract Normalized S/L/E 


zero 


<zero 


>zero 


Subtract Unnormalized S/L 


zero 


<zero 


>zero 


Fixed Point and Decimal Arithmetic 







>zero 
zero, 
carry 
A high 



>zero 
>zero 
>zero 



overflow 
not zero, 
carry 



overflow 
overflow 
overflow 

overflow 
not zero, 



CONDITION CODES (., 



..Cont'd) 




Condition Code Setting 

Mask Bit Position 8 

Logical Operations 

AND zero 

Compare Logical (A:B) equal 

Edit zero 

Edit and Mark zero 

Exclusive OR zero 
Insert Characters under Mask all zero 

Move Long (A:B) equal 

OR zero 

Test under Mask zero 

Translate and Test zero 



Input/Output Operc 



Set Clock 
Store Clock 
Test and set 
Load Real Address 



Reset Reference Bit 



A low 


A high 


- 


<zero 


> zero 


- 


<zero 


> zero 


- 


not zero 


- 


- 


1 st bit one 


1 st bit zero 


- 


A low 


A high 


overlap 


not zero 


- 


- 


mixed 


- 


one 


incomplete 


complete 


- 



Clear I/O 


no oper in 


Halt I/O, Halt Device 


interrupts 




pending 


Start l/0,SIOF 


started 


Store Channel ID 


ID stored 


Test I/O 


available 


Test Channel 


available 


Miscellaneous Operations 





i~ "p=i "■ CSW stored chan busy not oper 

interruption CSW stored See Prin Op not oper 

rtf*nAinn 

CSW stored busy not oper 

CSW stored ID not stored not oper 

CSW stored busy not oper 

interruption burst mode not oper 
pending 



set secure 

set not set 

zero one 

Translation Segment 
available table entry entry ir 

invalid 



not oper 
not oper 



Page table Segment- 



r Page 
table length 
violation 

Ref bit zero, Ref bit zero, Ref bit one, Refbit.one, 
change bit change bit change bit change bit 
zero one zero one 

accepted stat stored busy not oper 



CODE TRANSLATION TABLE 



Dec 


Hex 


Instruction 

(RR) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCII 





00 






NUL 


NUL 




12-0-1-8-9 


0000 0000 


1 


01 






SOH 


SOH 




12-1-9 


0000 0001 


2 


02 






STX 


STX 




12-2-9 


0000 0010 


3 


03 






ETX 


ETX 




12-3-9 


0000 0011 


4 


04 


SPM 




PF 


EOT 




12-4-9 


0000 0100 


5 


05 


BALR 




HT 


ENO 




12-5-9 


0000 0101 


6 


06 


BCTR 




LC 


ACK 




12-6-9 


0000 01 10 


7 


07 


BCR 




DEL 


BEL 




12-7-9 


0000 0111 


8 


08 


SSK 






BS 




12-8-9 


0000 1000 


9 


09 


ISK 






HT 




12-1-8-9 


0000 1001 


10 


0A 


SVC 




SMM 


LF 




12-2-8-9 


0000 1010 


11 


OB 






VT 


VT 




12-3-8-9 


0000 1011 


12 


OC 






FF 


FF 




12-4-8-9 


0000 1100 


13 


OD 






CR 


CR 




12-5-8-9 


0000 1101 


14 


OE 


MVCL 




SO 


SO 




12-6-8-9 


0000 1 1 10 


15 


OF 


CLCL 




SI 


SI 




12-7-8-9 


0000 1 1 1 1 


16 


10 


LPR 




DLE 


DLE 




12-11-1-8-9 


0001 0000 


17 


11 


LNR 




DC1 


DC1 




11-1-9 


0001 0001 


18 


12 


LTR 




DC2 


DC2 




11-2-9 


0001 0010 


19 


13 


LCR 




TM 


DC3 




11-3-9 


0001 0011 


20 


14 


NR 




RES 


DC4 




11-4-9 


0001 0100 


21 


15 


CLR 




NL 


NAK 




11-5-9 


0001 0101 


22 


16 


OR 




BS 


SYN 




11-6-9 


0001 0110 


23 


17 


XR 




IL 


ETB 




11-7-9 


0001 01 1 1 


24 


18 


LR 




CAN 


CAN 




11-8-9 


0001 1000 


25 


19 


CR 




EM 


EM 




11-1-8-9 


0001 1001 


26 


1A 


AR 




CC 


SUB 




11-2-8-9 


0001 1010 


27 


IB 


SR 




CU1 


ESC 




11-3-8-9 


0001 1011 


28 


1C 


MR 




IFS 


FS 




11-4-8-9 


0001 1100 


29 


ID 


DR 




IGS 


GS 




11-5-8-9 


0001 1101 


30 


IE 


ALR 




IRS 


RS 




11-6-8-9 


0001 1110 


31 


IF 


SLR 




IUS 


US 




11-7-8-9 


oooi mi 


32 


20 


LPDR 




DS 


SP 




11-0-1-8-9 


0010 0000 


33 


21 


LNDR 




SOS 


1 ! 




0-1-9 


0010 0001 


34 


22 


LTDR 




FS 


» 




0-2-9 


0010 0010 


35 


23 


LCDR 






i¥ 




0-3-9 


0010 0011 


36 


24 


HDR 




BYP 


5 




0-4-9 


0010 0100 


37 


25 


LRDR 




LF 


% 




0-5-9 


0010 0101 


38 


26 


MXR 




ETB 


& 




0-6-9 


0010 0110 


39 


27 


MXDR 




ESC 


■ 




0-7-9 


0010 0111 


40 


28 


LDR 






( 




0-8-9 


0010 1000 


41 


29 


CDR 






) 




0-1-8-9 


0010 1001 


42 


2A 


ADR 




SM 


* 




0-2-8-9 


0010 1010 


43 


2B 


SDR 




CU2 


+ 




0-3-8-9 


0010 1011 


44 


2C 


MDR 






, 




0-4-8-9 


0010 1100 


45 


2D 


DDR 




ENQ 


- 




0-5-8-9 


0010 1101 


46 


2E 


AWR 




ACK 






0-6-8-9 


0010 1110 


47 


2F 


SWR 




BEL 


/ 




0-7-8-9 


ooio mi 


48 


30 


LPER 











12-11-0-1-8- 


POO 11 0000 


49 


31 


LNER 






1 




1-9 


0011 0001 


50 


32 


LTER 




SYN 


2 




2-9 


0011 0010 


51 


33 


LCER 






3 




3-9 


0011 0011 


52 


34 


HER 




PN 


4 




4-9 


0011 0100 


53 


35 


LRER 




RS 


5 




5-9 


0011 0101 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 

(RR) 


Graphics and Controls 


7-Track Tape 
BCDIC(2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCII 


54 


36 


AXR 




uc 


6 




6-9 


0011 0110 


55 


37 


SXR 




EOT 


7 




7-9 


0011 0111 


56 


38 


LER 






8 




8-9 


0011 1000 


57 


39 


CER 






9 




1-8-9 


C011 1001 


58 


3A 


AER 










2-8-9 


0011 1010 


59 


3B 


SER 




CU3 


; 




3-8-9 


0011 1011 


60 


3C 


MER 




DC4 


< 




4-8-9 


0011 1100 


61 


3D 


DER 




NAK 


= 




5-8-9 


0011 1101 


62 


3E 


AUR 






> 




6-8-9 


0011 1110 


63 


3F 


SUR 




SUB 


? 




7-8-9 


0011 1111 



1 EBCDIC graphics shown ar« 
chain: See printer manual. 

2 Add C (check bit) for odd . 

3 For even parity use CA 



standard bit pattern assignments. For specific print train 
r even parity as needed, exept as noted. 



Dec 


Hex 


Instruction 

(RX) 


Grapl 


ics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCII 


64 


40 


STH 




SP 


© 


(3) 


no punches 


0100 0000 


65 


41 


LA 






A 




12-0-1-9 


0100 0001 


66 


42 


STC 






B 




12-0-2-9 


0100 0010 


67 


43 


IC 






C 




12-0-3-9 


0100 0011 


68 


44 


EX 






D 




12-0-4-9 


0100 0100 


69 


45 


BAL 






E 




12-0-5-9 


0100 0101 


70 


46 


BCT 






F 




12-0-6-9 


01000110 


71 


47 


BC 






G 




12-0-7-9 


0100 0111 


72 


48 


LH 






H 




12-0-8-9 


0100 1000 


73 


49 


CH 






1 




12-1-8 


0100 1001 


74 


4A 


AH 




t 


J 




12-2-8 


0100 1010 


75 


4B 


SH 






K 


B A8 2 1 


12-3-8 


0100 1011 


76 


4C 


MH 


n 


< 


L 


B A84 


12-4-8 


0100 1100 


77 


4D 




[ 


( 


M 


B A84 1 


12-5-8 


0100 1101 


78 


4E 


CVD 


< 


+ 


N 


B A842 


12-6-8 


0100 1110 


79 


4F 


CVB 


m 


1 


O 


B A842 1 


12-7-8 


oioo mi 


80 


50 


ST 


&+ 


& 


P 


B A 


12 


0101 0000 


81 


51 








Q 




12-11-1-9 


0101 0001 


82 


52 








R 




12-11-2-9 


0101 0010 


83 


53 








S 




12-11-3-9 


0101 0011 


84 


54 


N 






T 




12-11-4-9 


0101 0100 


85 


55 


CL 






U 




12-11-5-9 


0101 0101 


86 


56 


O 






V 




12-11-6-9 


0101 0110 


87 


57 


X 






w 




12-11-7-9 


0101 0111 


88 


58 


L 






X 




12-11-8-9 


0101 1000 


89 


59 


C 






Y 




11-1-8 


0101 1001 


90 


5A 


A 




r 


z 




11-2-8 


0101 1010 


91 


5B 


S 


s 


s 


[ 


B 8 2 1 


11-3-8 


0101 1011 


92 


5C 


M 


* 


* 


\ 


B 84 


11-4-8 


0101 1100 


93 


5D 


D 


] 


) 


] 


B 84 1 


11-5-8 


0101 1101 


94 


5E 


AL 






_, * 


B 842 


11-6-8 


0101 1110 


95 


5F 


S'L 


j£± 


— , 


- 


B 842 1 


11-7-8 


oioi mi 


96 


60 


STD 


- 


- 




B 


11 


0110 0000 


97 


61 




1 


/ 


a 


A 1 


0-1 


0110 0001 


98 


62 








b 




11-0-2-9 


0110 0010 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 

(RX) 


Graphics and Controls 


7-Track Tape 
BCDIC(2) 


Card Code 


Binary 


BCDIQ 


EBCDIC (1) 


ASCII 


99 


63 








c 




11-0-3-9 


0110 0011 


100 


64 








d 




11-0-4-9 


0110 0100 


101 


65 








e 




11-0-5-9 


0110 0101 


102 


66 








f 




11-0-6-9 


01100110 


103 


67 


MXD 






g 




11-0-7-9 


01100111 


104 


68 


LD 






h 




11-0-8-9 


0110 1000 


105 


69 


CD 






; 




0-1-8 


0110 1001 


106 


6A 


AD 




! 


i 




12-11 


0110 1010 


107 


6B 


SD 






k 


A8 2 1 


0-3-8 


0110 1011 


108 


6C 


MD 


°/° 


°/o 


l 


A84 


0-4-8 


0110 1100 


109 


6D 


DD 


Y 




m 


A84 1 


0-5-8 


0110 1101 


110 


6E 


AW 


\ 


> 


n 


A842 


0-6-8 


0110 1110 


111 


6F 


SW 


-W- 


? 


o 


A842 1 


0-7-8 


ono mi 


112 


70 


STE 






P 




12-11-0 


0111 0000 


113 


71 








q 




12-11-0-1-9 


0111 0001 


114 


72 












12-11-0-2-9 


0111 0010 


115 


73 








s 




12-11-0-3-9 


0111 0011 


116 


74 








t 




12-11-0-4-9 


0111 0100 


117 


75 








u 




12-11-0-5-9 


0111 0101 


118 


76 








V 




12-11-0-6-9 


0111 0110 


119 


77 








w 




12-11-0-7-9 


0111 0111 


120 


78 


LE 






x 




12-11-0-8-9 


0111 1000 


121 


79 


CE 






y 




1-8 


0111 1001 


122 


7A 


AE 






z 


A 


2-8 


0111 1010 


123 


7B 


SE 


#= 


# 


{ 


8 2 1 


3-8 


0111 1011 


124 


7C 


ME 


©' 


@ 


1 


84 


4-8 


0111 1100 


125 


7D 


DE 






I 


84 1 


5-8 


0111 1101 


126 


7E 


AU 


> 


= 


842 


6-8 


0111 1110 


127 


7F 


SU 


V 


" 


DEL 


842 1 


7-8 


oin mi 



1 EBCDIC graphics shown are standard bit pattern assignments. For specific print train/ 
chain: See printer manual. 

2 Add C (check bit) for odd or even parity as needed, exept as noted. 



Dec 


Hex 


Instruction 
(RS,SI,S) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCI 


128 


80 


SSM 










12-0-1-8 


1000 0000 


129 


81 






a 






12-0-1 


1000 0001 


130 


82 


LPSW 




b 






12-0-2 


1000 0010 


131 


83 


Diagnose 




c 






12-0-3 


1000 0011 


132 


84 


WRD 




d 






12-0-4 


1000 0100 


133 


85 


RDD 




e 






12-0-5 


1000 0101 


134 


86 


BXH 




f 






12-0-6 


1000 0110 


135 


87 


BXLE 




g 






12-0-7 


1000 01 1 1 


136 


88 


SRL 




h 






12-0-8 


1000 1000 


137 


89 


SLL 




i 






12-0-9 


1000 1001 


138 


8A 


SRA 










12-0-2-8 


1000 1010 


139 


8B 


SLA 










12-0-3-8 


1000 1011 


140 


8C 


SRDL 










12-0-4-8 


1000 1100 


141 


8D 


SLDL 










12-0-5-8 


1000 1101 


142 


8E 


SRDA 










12-0-6-8 


1000 1110 


143 


8F 


SLDA 










12-0-7-8 


iooo nn 


144 


90 


STM 










12-11-1-8 


1001 0000 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 
(RS,SI,S) 


Graphics and Controls 


7-Track Tape 
BCDIC(2) 


Card Code 


Binary 


BCDIC 


ebcdico: 


ASCII 


145 


91 


TM 




• 






12-11-1 


1001 0001 


146 


92 


MVI 




k 






12-11-2 


1001 0010 


147 


93 


TS 




1 






12-11-3 


1001 0011 


148 


94 


Nl 




m 






12-11-4 


1001 0100 


149 


95 


CLI 




n 






12-11-5 


1001 0101 


150 


96 


Ol 




o 






12-11-6 


1001 0110 


151 


97 


XI 




P 






12-11-7 


1001 0111 


152 


98 


LM 




q 






12-11-8 


1001 1000 


153 


99 












12-11-9 


1001 1001 


154 


9A 












12-11-2-8 


1001 1010 


155 


9B 












12-11-3-8 


1001 1011 


156 


9C 


SIO,SIOF 










12-11-4-8 


1001 1100 


157 


9D 


TIO 










12-11-5-8 


1001 1101 


158 


9E 


HIO,HDV 










12-11-6-8 


1001 1110 


159 


9F 


TCH 










12-11-7-8 


1001 1111 


160 


A0 












11-0-1-8 


1010 0000 


161 


Al 






/~ 






11-0-1 


1010 0001 


162 


A2 






s 






11-0-2 


1010 0010 


163 


A3 






t 






11-0-3 


1010 0011 


164 


A4 






u 






11-0-4 


1010 0100 


165 


A5 






v 






11-0-5 


1010 0101 


166 


A6 






w 






11-0-6 


10100110 


167 


A7 






x 






11-0-7 


10100111 


168 


A8 






y 






11-0-8 


1010 1000 


169 


A9 












11-0-9 


1010 1001 


170 


AA 












11-0-2-8 


1010 1010 


171 


AB 












11-0-3-8 


1010 1011 


172 


AC 


STNSM 










11-0-4-8 


1010 1100 


173 


AD 


STOSM 










11-0-5-8 


1010 1101 


174 


AE 


SIGP 










11-0-6-8 


1010 1110 


175 


AF 


MC 










11-0-7-8 


ioio mi 


176 


BO 












12-11-0-1-8 


1011 0000 


177 


Bl 


LRA 










12-11-0-1 


1011 0001 


178 


B2 


See below 










12-11-0-2 


1011 0010 


179 


B3 












12-11-0-3 


1011 0011 


180 


B4 












12-11-0-4 


1011 0100 


181 


B5 












12-11-0-5 


1011 0101 


182 


B6 


STCTL 










12-11-0-6 


1011 0110 


183 


B7 


LCTL 










12-11-0-7 


1011 0111 


184 


B8 












12-11-0-8 


1011 1000 


185 


B9 












12-11-0-9 


1011 1001 


186 


BA 


CS 










12-11-0-2-8 


1011 1010 


187 


BB 


CDS 










12-11-0-3-8 


1011 1011 


188 


BC 












12-11-0-4-8 


1011 1100 


189 


BD 


CLM 










12-11-0-5-8 


1011 1101 


190 


BE 


STCM 










12-11-0-6-8 


1011 1110 


191 


BF 


ICM 










12-11-0-7-8 


ion mi 



Op Code: 
B202 - STIDP 
B203 - ST IDC 
B204 - SCK 
B205 - STCK 
8206 - SCKC 



B207 - STCKC 
B208 - SPT 
B209 - STPT 
B20D-PTLB 
B213 - RRB 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 
(SS) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


ebcdico: 


ASCII 


192 


CO 




? 


{ 




B A8 2 


12-0 


1 100 0000 


193 


CI 




A 


A 




BA 1 


12-1 


3100 0001 


194 


C2 




B 


B 




BA 2 


12-2 


1100 0010 


195 


C3 




C 


C 




B A 2 1 


12-3 


1100 0011 


196 


C4 




D 


D 




B A 4 


12-4 


1100 0100 


197 


C5 




E 


E 




B A 4 1 


12-5 


1100 0101 


198 


C6 




F 


F 




B A 42 


12-6 


1100 0110 


199 


C7 




G 


G 




BA 42 1 


12-7 


1100 0111 


200 


C8 




H 


H 




BA8 


12-8 


1100 1000 


201 


C9 




1 


I 




BA8 1 


12-9 


1100 1001 


202 


CA 












12-0-2-8-9 


1100 1010 


203 


CB 












12-0-3-8-9 


1100 1011 


204 


CC 






J 






12-0-4-8-9 


1100 1100 


205 


CD 












12-0-5-8-9 


1100 1101 


206 


CE 






V 






12-0-6-8-9 


1100 1110 


207 


CF 












12-0-7-8-9 


noo mi 


208 


DO 




1 


} 




B 8 2 


11-0 


1101 0000 


209 


Dl 


MVN 


J 


J 




B 1 


11-1 


1101 0001 


210 


D2 


MVC 


K 


K 




B 2 


11-2 


1101 0010 


211 


D3 


MVZ 


L 


L 




B 2 1 


11-3 


1101 0011 


212 


D4 


NC 


M 


M 




B 4 


11-4 


1101 0100 


213 


D5 


CLC 


N 


N 




B 4 1 


11-5 


1101 0101 


214 


D6 


OC 


O 


O 




B 42 


11-6 


1101 0110 


215 


D7 


XC 


P 


P 




B 42 1 


11-7 


1101 0111 


216 


D8 




Q 


Q 




B 8 


11-8 


1101 1000 


217 


D9 




R 


R 




B 8 1 


11-9 


1101 1001 


218 


DA 












12-11-2-8-9 


1101 1010 


219 


DB 












12-11-3-8-9 


1101 1011 


220 


DC 


TR 










12-11-4-8-9 


1101 1100 


221 


DD 


TRT 










12-11-5-8-9 


1101 1101 


222 


DE 


ED 










12-11-6-8-9 


1101 1110 


223 


DF 


EDMK 










12-11-7-8-9 


noi mi 


224 


E0 




* 


\ 




A8 2 


0-2-8 


1 1 10 0000 


225 


El 










11-0-1-9 


1110 0001 


226 


E2 




S 


S 




A 2 


0-2 


1110 0010 


227 


E3 




T 


T 




A 2 1 


0-3 


1110 0011 


228 


E4 




U 


U 




A 4 


0-4 


1110 0100 


229 


E5 




V 


V 




A 4 1 


0-5 


11100101 


230 


E6 




w 


w 




A 42 


0-6 


11100110 


231 


E7 




X 


X 




A 42 1 


0-7 


11100111 


232 


E8 




Y 


Y 




A8 


0-8 


1110 1000 


233 


E9 




z 


z 




A8 1 


0-9 


1110 1001 


234 


EA 












H_0-2-8-9 


1110 1010 


235 


EB 












H_0-3-8-9 


1110 1011 


236 


EC 






H 






11-0-4-8-9 


1110 1100 


237 


ED 












11-0-5-8-9 


1110 1101 


238 


EE 












11-0-6-8-9 


1110 1110 


239 


EF 












11-0-7-8-9 


mo nn 


240 


FO 


SRP 










8 2 





11 11 0000 


241 


Fl 


MVO 


1 


i 




1 


1 


nn oooi 


242 


F2 


PACK 


2 


2 




2 


2 


nn ooio 


243 


F3 


UNPK 


3 


3 




2 1 


3 


nn oon 


244 


F4 




4 


4 




4 


4 


1111 0100 


245 


F5 




5 


5 




4 1 


5 


nn oioi 



CODE TRANSLATION TABLE ( 



Dec 


Hex 


Instruction 
(SS) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCII 


246 


F6 




6 


6 




42 


6 


1111 0110 


247 


F7 




7 


7 




42 1 


7 


1111 0111 


248 


F8 


ZAP 


8 


8 




8 


8 


1111 1000 


249 


F9 


CP 


9 


9 




8 1 


9 


1111 1001 


250 


FA 


AP 




1 






12-11-0-2-8-9 


1111 1010 


251 


FB 


SP 










12-11-0-3-8-9 


1111 1011 


252 


FC 


MP 










12-11-0-4-8-9 1111 1100 


253 


FD 


DP 










12-11-0-5-8-91111 1101 


254 


FE 












12-11-0-6-8-91111 1110 


255 


FF 












12-11-0-7-8-91111 1111 



MACHINE INSTRUCTIONS FORMATS 



; s 



FIRST HALFWORD1 



SECONDHALFWORD2 



REGISTER REGISTER 

OPERAND 1 OPERAND 2 



Op Code 



7|8 1112 15 
REGISTER 
OPERAND 1 



Op Code | Rl | X2 | B2 1 



ADDRESS OF 
OPERAND 2 



7|8 11 12 15|16 1920 
REGISTER REGISTER ADDRESS OF 

OPERAND 1 OPERAND 3 OPERAND 2 



Op Code | Rl | R3 | B2 | 



Op Code 



11 12 15 
IMMEDIATE 



ADDRESS OF 
OPERAND 1 



16 19 20 31 

ADDRESS OF 
OPERAND 1 



Bl 



Dl 



| 15|16 19 20 

LENGTH LENGTH ADDRESS OF 

OPERAND 1 OPERAND 2 OPERAND 1 



Op Code | LI |l2/I3| Bl | 



Op Code 



8 11 12 15 
LENGTH 



Dl 



16 19 20 31 

ADDRESS OF 
OPERAND 1 



THIRD HALFWORD 3 



ADDRESS OF 
OPERAND 2 



32 35 36 
ADDRESS OF 
OPERAND 2 



15 16 19 20 

1-13 



31 32 35 36 



CONTROL REGISTER ALLOCATION 






1 


2 | 3 


SYSTEM CONTR 


TRANSL CONTR 


EXTERNAL INTERRUPTION MASKS 


SEGM TBL LENGTH 


SEGMENT TABLE ORIGIN ADDRESS | 


CHANNEL MASKS 














MONITOR MASKS 


PER EVENT MASKS 




PER GR ALTERATION MASKS 




PER STARTING ADDRESS 




PER ENDING ADDRESS 






ERROR RECOVERY 
CONTR & MASKS 






MCEL ADDRESS 



ASSIGNMENT OF CONTROL REGISTER FIELDS 



Word 


Bits 


Name of Field 


Facility 


Initial 
value 








Block-Multiplexing Mode 


Block Multiplexing Control 








1 


SSM Suppression 


Extended Control 








8-9 


Page Size 


Dynamic Address Translation 








10 


Reserved 


Dynamic Address Translation 








11-12 


Segment Size 


Dynamic Address Translation 








20 


Clock Comparator Mask 


Clock Comparator 








21 


CPU Timer Mask 


CPU Timer 








24 


Interval Timer Mask 


External Interruption 


1 





25 


Interrupt Key Mask 


External Interruption 


1 





26 


External Signal Mask 


External Interruption 


1 


1 


0-7 


Segment Table Length 


Dynamic Address Translation 





1 


8-25 


Segment Table Address 


Dynamic Address Translation 





2 


0-31 


Channel Masks 


I/O Interruptions 


1 


8 


16-31 


Monitor Masks 


Monitoring 





9 


0-7 


PER* Event Masks 


Program-Event Recording 





9 


16-31 


PER GR Aletration Masks 


Program- Event Recording 





10 


8-31 


PER Staring Address 


Program-Event Recording 






ASSIGNMENT Of CONTROL REGISTER FIELDS (....Cont'd) 



Word 


Bits 


Name of Field 


Facility 


Initial 
value 


11 


8-31 


PER Ending Address 


Program-Event Recording 





14 





Check-Stop Control 


Machine-Check Handling 


1 


14 


1 


Synchronous MCEL** Control 


Machine-Check Handling 


1 


14 


2 


I/O Extended Logout Control 


Machine-Check Handling 





14 


4 


Recovery Report Mask 


Machine-Check Handling 





14 


5 


Degradation Report Mask 


Machine-Check Handling 





14 


6 


External Damage Report Mask 


Machine-Check Handling 


1 


14 


7 


Warning Mask 


Machine-Check Handling 





14 


8 


Asynchronous MCEL Control 


Machine-Check Handling 





14 


9 


Asynchronous Fixed Log Contr. 


Machine-Check Handling 





15 


8-28 


MCEL Address 


Machine-Check Handling 


512*** 



Explanation: 

The fields not listed are unassigned. 

The initial value of unassigned register positic 



is unpredictable. 



PER means Program-Event Recording 

MCEL means machine-check extended logout 

Bit 22 is set to one, with all other bits set to zero, thus yielding a decim 

byte address of 512 



PERMANENT MAIN STORAGE ASSIGNMENT 



Storage Loc 


Byte 


B t 






Byte 


Byte 


Hex 


Dec 


y 








Restart New PSW (IPL PSW) 




4 
8 


4 
8 






Restart Old PSW (IPL CCW1) 




C 

10 


12 
16 






(IPL CCW2) 




14 
18 


20 
24 






External Old PSW 




1C 
20 


28 
32 






Supervisor Call Old PSW 




24 
28 


36 

40 






Program Old PSW 




2C 
30 


44 
48 






Machine Check Old PSW 




34 
38 


52 
56 






Input/Output Old PSW 




3C 
40 


60 
64 






Channel Status Word 




44 
48 
4C 
50 
54 
58 


68 
72 
76 

80 
84 
88 






Channel Address Word 




Interval Timer 




External New PSW 




5C 
60 


92 
96 






Supervisor Call New PSW 




64 
68 


100 
104 






Program New PSW 




6C 
70 


108 
112 






Machine Check New PSW 




74 
78 


116 
120 






Input/Output New PSW 




7C 

80 
84 
88 
8C 


124 
128 
132 
136 
140 








0000000000000000 


External Interruption Code 


0000000000000 


ILC 





SVC Interruption Code 


0000000000000 


ILC 





Program Interruption Code 



PERMANENT MAIN STORAGE ASSIGNMENT (. ...Cont'd) 



Storage Loc 



Byte 



Byte 



Byte 



Byte 



00000000 



Translation Exception Addre 



00000000 



Monitor Class #= PER Code 



00000000 



00000000 



Limited Channel Logout 



I/O Address 



D4 


212 


D8 


216 


DC 


220 


E0 


224 


E4 


228 


E8 


232 


EC 


236 


F0 


240 


F4 


244 


F8 


248 


FC 


252 


100 


256 


15C 


348 


160 


352 



Machine Check CPU-Timer Save Area 



Machine Check Clock -Comparator Save Area 



Machine Check Interruption Code 



Failing Storage Address 



Region Code 



Machine Check Fixed Logout Area 



Machine Check Floating Point Register Save Area 



Machine Check General Register Save Area 



Machine Check Control Register Save Area 



00000000 



PROGRAM STATUS WORD (EC-mode) 



3 
















3 








16 




24 31 





R 











T 


* 


E 


KEY 


1 


M 


W 


P 


00 


CC 


PROG 
MASK 


00000000 


32 40 63 


00000000 


INSTUCTION ADDRESS 



ill 


Description 


Bit 


Description 





Always zero 


15 


Problem state 


1 


PER mask 


16-17 


Always zero 


2-4 


Always zero 


18-19 


Condition code 


5 


Translate mode 


20 


Fixed-point overflow mask 


6 


I/O interrupt mask 


21 


Decimal overflow mask 


7 


External interrupt mask 


22 


Exponent overflow mask 


8-11 


KEY 


23 


Significance mask 


12 


Always one (EC mode) 


24-31 


Always zero 


13 


Machine check mask 


32-39 


Always zero 


14 


Wait state 


40-63 


Instruction address 


PROGRAM STATUS WORD (BC-mode) 







CHAN 
MASK 



INTERRUPTION CODE 



ILC 


CC 


PROG 
MASK 


INSTRUCTION ADDRESS 



Description 

Channel mask 
Channel 1 mask 
Channel 2 mask 
Channel 3 mask 
Channel 4 mask 
Channel 5 mask 
Mask for channel 6 and up 
External interrupt mask 
Protection key 
Always (BC mode) 
Machine check mask 



Bit 


Description 


14 


Wait state 


15 


Problem state 


16-31 


Interruption code 


32-33 


Instruction length code 


34-35 


Condition code 


36 


Fixed-point overflow mask 


37 


Decimal overflow mask 


38 


Exponent underflow mask 


39 


Significance mask 


40-63 


Instruction address 



CHANNEL ADDRESS WORD (CAW) (X'46") 



Key 





Command Address 



CHANNEL COMMAND WORD (CCW) 



Command Code 


Data Address 


7 8 




15 16 23 24 


31 


F i as! 





TP Op. Code 


Byte Count 



Description 



CD-bit (80) 
CC-bit (40) 
SLl-bit (20) 
Skipbit(lO) 
PCI-bit(08) 
IDA-bit(04) 



causes use of address portion of next CCW 

causes use of command code and data address of next CCW 

causes suppression of possible incorrect length indication 

supresses transfer of information to main storage 

causes a channel Program Controlled Interruption 

specifies indirect data addressing 



CHANNEL STATUS WORD (CSW) (X'40') 



Key 





Command Address 


3 4 7 8 


15 16 23 24 


31 


Status 


Byte Count 



Description 



39 

Byte count: 



(8000) Attention 

(4000) Status Modifier 

(2000) Control unit end 

(1000) Busy 

(0800) Channel end 

(0400) Device end 

(0200) Unit check 

(0100) Unit exception 



Description 



(0080) Program controlled interruption 

(0040) Incorrect length 

(0020) Program check 

(0010) Prot ection check 

(0008) Channel data check 

(0004) Channel control check 

(0002) Interface control check 

(0001) Chaining check 



Bits 48-63 form the residual count for the last CCW used. 



LIMITED CHANNEL LOGOUT (X'BO') 






SCUid 


Detect 


Source 





Field Validity Flags 


TT 


A 


Seq 



12 13 15 16 



23 24 26 28 29 31 



Detect 


Bit 


Description 


4 


CPU 


5 


Channel 


6 


Storage control unit 


7 


Storage unit 


Field 


Validity Flags 


Bit 


Description 


16 


Interface address 


17 


Reserved (0) 


18 


Reserved (0) 


19 


Sequence code 


20 


Unit status 


21 


Command address and key 


22 


Channel address 


23 


Device address 



Description 



CPU 
Channel 

Storage control u 
Storage unit 
Control unit 



TT (Type of termination) 





1 

1 
1 1 



Interface disconnect 
Stop, stack or normal 
Selective reset 
System reset 



A (bit 28) ; I/O error alert 

Seq (bits 29-31) : Sequence code 



MACHINE CHECK INTERRUPTION CODE (X'E8') 



MC Conditions 





Time 


Stg 
error 





Validity 


8 9 13 14 16 18 19 20 


31 


0000000000000000 


MCEL Length 



MC Conditions 


Bit 


Description 




1 
2 
3 

4 
5 
6 

7 
8 


System damage 
Instr.proc'g damage 
System recovery 
Timer damage 
TOD clock damage 
External damage 

Auto configuration 
Warning 



14 Backed-up 

15 Delayed 



Description 

Storage error uncorrected 
Storage error corrected 
Storage-error key uncorrected 



MACHINE CHECK INTERRUPTION CODE (....Cont 'd) 



Validity 

Bit | Descriptio 



PSWbits 12-15 
PSW masks and key 
Program mask and cond.code 
Instruction address 
Failing storage address 
Region code 



Description 



Floating-point registers 
General registers 
Control registers 
CPU extended logout 
Storage logical 



CODES FOR PROGRAM INTERRUPTION (X'8E') 



Interruption 


Program Interruption 


Interruption 


Program Interruption 


Code 


Cause 


Code 


Cause 


Dec Hex 




Dec 


Hex 




I 0001 


Operation 


12 


oooc 


Exponent overflow 


2 0002 


Privileged operation 


13 


0OOD 


Exponent underflow 


3 0003 


Execute 


14 


000E 


Significance 


4 0004 


Protection 


15 


000F 


Floating point divide 


5 0005 


Addressing 


16 


0010 


Segment translation 


6 0006 


Specification 


17 


0011 


Page translation 


7 0007 


Data 


18 


0012 


Translation specification 


8 0008 


Fixed-point overflow 


19 


0013 


Special operation 


9 0009 


Fixed-point divide 


64 


0040 


Monitor event 


10 OO0A 


Decimal overflow 


128 


0080 


Program event 


11 0003 


Decimal divide 









CODES FOR EXTERNAL INTERRUPTIONS (X'86 1 ) 



Interruption Code 


External Interruption 


(Hex) 


Cause 


0080 


Interval timer 


0040 


Interrupt key 


0020 


External signal 2 


0010 


External signal 3 


0008 


External signal 4 


0004 


External signal 5 


0002 


External signal 6 


0001 


External signal 7 


1004 


Clock comparator 


1005 


CPU timer 



CODES FOR INPUT/OUTPUT INTERRUPTIONS (X'BA 1 ) 



Interruption Code 


Input/Output Interruption 


(Hex) 


Cause 


00 dd 


Channel 


01 dd 


1 


02 dd 


2 


03 dd 


3 


04 dd 


4 


05 dd 


5 


06 dd 


6 



Note: d= device address 



CODES FOR SUPERVISOR CALL INTERRUPTIONS (X'8A') 



Interruption Code 
(Hex) 


Supervisor Call Interruption 
Cause 


00 rr 


Instruction (0A) 



= R1 and R2 field of 
SUPERVISOR CALL 



CHANNEL COMMANDS 

Standard Command Code Assignments (CCW bits 0-7) for I/O Operatic 



xxxx 0000 


Invalid 


tttt ttoi 


Write 


tttt 0100 


Sense 


tttt ttio 


Read 


XXXX 1000 


Transfer in Channel 


tttt tt 1 1 


Control 


tttt 1100 


Read backward 


0000 0011 


Control No Operation 



x-Bit ignored t Modifier bit for specific type of I/O device 

3210, 3215 CONSOLES Source: GA24-3557 



Write, No Carrier Return 
Write, Auto Carrier Return 
Read Inquiry 



Sense 
Audible Alarm 



3505 CARD READER/3525 CARD PUNCH 




Source: GA21-9124 


Command 


Binary 
0000 1 00 


Hex 
04 


Bit Meanings 
SS Stacker 


Sense 


Feed, Select Stacker 


SS 1 F0 1 1 




00 1 

01 2 
10 2 


Read Only * 


11 DO F0 1 




Diagnostic Read 


110 1 00 10 


D2 


Read, Feed, Select Stacker * 


SSD0 F0 1 




Write RCE Format * t 


000 1 000 1 


1 1 


Format Mode 

Unformatted 

1 Formatted 



* Special feature on 3525 t Special feature on 3505 



3505 CARD READER/3525 CARD PUNCH (. . . .Cont'd) 



Special feature on 3525 



3505 only 






Write OMR Format 


00 11000 1 3 1 


D Data Mode 


3525 only 




1-EBCDIC 


Write, Feed, Select Stacker S S DO 1 


1 2-Card image 


Print Line * 


LLLL L 1 1 


L Line Position 
5 bit binary value 



3211 PRINTER/3811 CONTROL 


UNIT 


Source: 


GA24-3543 


Space 1 Line 


After | 
Write 


Immed. 


Write without spacing 


01 


09 


0B 


Space 2 Lines 


11 


13 


Sense 


04 


Space 3 Lines 


19 


IB 


Load UCSB 


FB 


Skip to Channel 


- 


83 


Fold 


43 


Skip to Channel 1 


89 


8B 


Unfold 


23 


Skip to Channel 2 


91 


93 


Load FCB 


63 


Skip to Channel 3 


99 


9B 


Block Data Check 


73 


Skip to Channel 4 


Al 


A3 


Allow Data Check 


7B 


Skip to Channel 5 


A9 


AB 


Read PLB 


02 


Skip to Channel 6 


Bl 


B3 


Read UCSB 


0A 


Skip to Channel 7 


B9 


BB 


Read FCB 


12 


Skip to Channel 8 


CI 


C3 


Check Read 


06 


Skip to Channel 9 


C9 


CB 


Diagnostic Write 


05 


Skip to Channel 10 


Dl 


D3 


Raise Cover 


6B 


Skip to Channel 11 


D9 


DB 


Diagnostic Gate 


07 


Skip to Channel 12 


El 


E3 







3803/3420 MAGNETIC TAPE 






Source: 


GA32-0020 


Write 


01 


Data Security Erase 




97 


Read Forward 


02 


Diagnostic Write Mode Set 


0B 


Read Backward 

Sense 

Sense Reserve * 


OC 
04 
F4 


Set Mode 1 (7-track) 


t 




Density Parity DC 


Trans 


Cmd 


Sense Release * 


D4 


f f on 


off 


53 


Request Track in Error 
Loop Write to Read 
Set Diagnose 
Rewind 


IB 
8B 
4B 
07 


odd { „ 

556 l ° ff 

[ even off 


/off 

/off 
\on 


73 
7B 
63 

6B 


Rewind Unload 


OF 




off 
/off 
\ on 
J off 


93 
B3 
BB 
A3 
AB 


Erase Gap 
Write Tape Mark 
Backspace Block 
Backspace File 
Forward Space Block 
Forward Space File 


17 
IF 
27 
2F 
37 
3F 


800 | ° dd i° ff 

[ even off 

Set Mode 2 (9-track) 






1600 bpi 
800 bpi t 




C3 

CB 



* Two-channel switch required t Special feature for NRZI operatic 



DIRECT ACCESS DEVICES 



Source: GA26-1592 for 3830/3330 

GA26-1589 for 2835/2305 

GA26-3599,GA26-1606 for 2314,2319 



Command 


MTOff 


MTOn* 


Count 


Control 


Orient (c) 


2B 




Nonzero 




Recalibrate 


13 




Nonzero 




Seek 


07 




6 




Seek cylinder 


OB 




6 




Seek Head 


IB 




6 




Space Count 


OF 




3 (a); nonzero (d) 




Set File Mask 


IF 




1 




Set Sector (a) 


23 




1 




Restore (a) 


17 




Nonzero 




Vary Sens ing (c) 


27 




1 




Diagnostic Load (a) 


53 




1 




Diagnostic Write (a) 


73 




512 


Search 


Home Address Equal 


39 


B9 


4 




Identifier Equal 


31 


Bl 


5 




Identifier High 


51 


Dl 


5 




Identifier Equal or High 


71 


Fl 


5 




Key Equal 


29 


A9 


KL 




Key High 


49 


C9 


KL 




Key Equal or High 


69 


E9 


KL 




Key and Data Equal (d) 


2D 


AD 








Key and Data High (d) 


4D 


CD 








Key and Data Equal or High(d) 


6D 


ED 






Continue 


Search Equal (d) 


25 


A5 




Number of bytes 

. (incl. mask bytes) 

in search argument 


Scan 


Search High (d) 

Search High or Equal (d) 


45 
65 


C5 

E5 






Set Status Modifier (d) 


35 


B5 








Set Status Modifier (d) 


75 


F5 








No Status Modifier (d) 


55 


D5 






Read 


Home Address 


1A 


9A 


5 




Count 


12 


92 


8 




Record 


16 


96 


1 




Data 


06 


86 


Number of bytes 




Key and Data 


OE 


8E 


\ to be transferred 




Count, Key and Data 


IE 


9E 


J 




IPL 


02 






Sector (a) 


22 




1 


Sense 


Sense I/O 


04 




24 (a); 6 (d) 




Read, Reset Buffered Log (b) 


A4 




24 




Read Buffered Log (c) 


24 




128 




Device Release (e) 


94 




24 (a); 6 (d) 




Device Reserve (e) 


B4 




24 (a); 6 (d) 




Read Diagnostic Status 1 (a) 


44 




16 or 512 


Write 


Home Address 


19 




5 




Record 


15 




8+KL+DLorRO 




Erase 


11 




8+KL+DL 




Count, Key and Data 


ID 




8+KL+DL 




Special Count, Key and Data 


01 




8+KL-DL 




Data 


05 




DL 




Key and Data 


0D 




KL+DL 



Code same as MT Off except as listed 
, 3830/3330 and 2835/2305 only 
3830/3330 only c 2835/2305 only 



d 2314,2319 only 

e Channel attachment and 2-channel switch 
feature required;standard on 2314 with 284 



HEXADECIMAL AND DECIMAL CONVERSION 



Locate each hex digit in its corresponding column f 
decimal equivalents. Add these to obtain the decin 



i\ valut 



Locate the largest decimal value in the table that will fit into the decimal 

number to be converted. 

Note its hex equivalent and hex column position. 

Find the decimal remainder. 

Repeat the process on this and subsequent remainders. 



Hexadecimal Columns 


6 


5 


4 


3 


2 


1 


Hex Dec 


He 


x Dec 


He 


x Dec 


Hex 


Dec 


Hex 


Dec 


Hex 


Dec 



































1 1 048 576 


1 


65 536 


1 


4096 


1 


256 


1 


16 


1 


1 


2 2097152 


2 


131072 


2 


8 192 


2 


512 


2 


32 


2 


2 


3 3145728 


3 


196608 


3 


12288 


3 


768 


3 


48 


3 


3 


4 4194304 


4 


262 144 


4 


16384 


4 


1024 


4 


64 


4 


4 


5 5242880 


5 


327680 


5 


20480 


5 


1280 


5 


80 


5 


5 


6 6291456 


6 


393216 


6 


24576 


6 


1536 


6 


96 


6 


6 


7 7340032 


7 


458752 


7 


28 672 


7 


1792 


7 


112 


7 


7 


8 8 388608 


8 


524288 


8 


32768 


8 


2048 


8 


128 


8 


8 


9 9437 184 


9 


589824 


9 


36864 


9 


2304 


9 


144 


9 


9 


A 10485760 


A 


655360 


A 


40 960 


A 


2 560 


A 


160 


A 


10 


B 11534336 


B 


720896 


B 


45056 


B 


2816 


B 


176 


B 


11 


C 12582912 


C 


786432 


C 


49152 


C 


3072 


C 


192 


C 


12 


D 13631488 


D 


851968 


D 


53248 


D 


3328 


D 


208 


D 


13 


E 14680064 


E 


917504 


E 


57344 


E 


3584 


E 


224 


E 


14 


F 15728 640 


F 


983040 


F 


61440 


F 


3840 


F 


240 


F 


15 


123 


4567 


123 


4567 


123 


4567 


Byte 


Byte 


Byte 



POWERS OF 16 



2 n 


n 


256 


8 


512 


9 


1024 


10 


2048 


11 


4096 


12 


8 192 


13 


16384 


14 


32768 


15 


65536 


16 


131072 


17 


262144 


18 


524288 


19 


1048 576 


20 


2097152 


21 


4194304 


22 


8 388608 


23 


16777216 


24 



16" 


n 


1 





16 


1 


256 


2 


4096 


3 


65536 


4 


1048 576 


5 


16777216 


6 


268435456 


7 


4294967296 


8 


68719476736 


9 


1099511627776 


10 


17592 186044416 


11 


281474976710656 


12 


4503599627370496 


13 


72057594037927936 


14 


1 152921504606846976 


15 



SENSE INFORMATION SUMMARY 

1017 - Paper Tape Reader 

Sense Byte Designation 

BitO : command reject 

1 : intervention reject 

2 : bus-out check 
3:- 

4 : data check 

5: - 

6:- 

7 : broken tape 

1018 - Paper Tape Punch 

Sense Byte Designation 

BitO : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5: - 

6: - 



1287 -Optical Reader 
Sense Byte 



BitO : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : non-recovery 

7: keyboard correction (tape only) 

BitO : tape mode 

1 : late stacker select 

2 : no document found 
3: - 

4 : invalid operation 
5: - 
6: - 
7: - 



SENSE INFORMATION SUMMARY (. . .Continued) 



- Optical Reader 



Sense 


Byte 


Designation 





Bit : command reject 






1 : intervention required 






2 : bus -out check 






3 : equipment check 

4 : data check 






5 : overrun 






6 : non-recovery 
7: - 


1 




Bit 0: - 






1 : end-of-page 

2 : no document found 



Sense Byte 




Designation 



: command reject 

: intervention required 

: bus-out check 

: equipment check 

: data check 

: parity check (UCS storage) 



7 : channel 9 



: chain interlock 

1 : forms check 

2 : coil protect check 

3 : subscan ring check 

4 : chain buffer address register check 
5: - 

6 : any hammer on check 
7: - 



Not used 

Bit : hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register parity check 

7 : clock check 



SENSE INFORMATION SUMMARY (. ■ -Continued) 

1403 - Printer (. . .Continued) 

Sense Byte Designation 

5 Bit : open hammer cc 

1-7: - 

1419 - PCU - MICR 



Sense Byte Designation 



1419 -SCU- MICR 



Bit : command reject 

1 : intervention required 

2 : bus-out check 
3: - 

4 : data check 

5 : overrun 

6 : autoselect 
7: - 

Bit : - 

1 : - 

2 : document under read head 

3 : amount field valid 

4 : process-control field valid 

5 : account-number field valid 

6 : transit field valid 

7 : serial-number field valid 





Sense Byte 


Designation 







Bit 


: command reject 

1 : intervention required 

2 : bus-out check 
3: - 

4: - 

5 : late stacker select 

6 : autoselect 

7 : operator attention 


1442- 


- Card Read-P 


unch / Card Pv 


jnch 




Sense Byte 


Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 



SENSE INFORMATION SUMMARY (...Continued) 



1443 


- Printer 






Sense Byte 


Designation 







Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : type bar 
5 : type bar 
6: - 

7: - 


2260 


- Display Station 






Sense Byte 


Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 
4-7: - 



2311 -Disk Storage 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 
4: data check 

5 : overrun 

6 : track conditio 

7 : seek check 



i check 



Jit : data check in count are< 

1 : track overrun 

2 : end of cylinder 

3 : invalid sequence 

4 : no record found 
5 : file protect 

6 : missing address marker 

7 : overflow incomplete 

[-.safe 



ALU check 
unselected file status 



SENSE INFORMATION SUMMARY (...Continued) 



2311 


- Disk 


Storage ( 


. . .Continued) 




Sense 


Byte 


Designation 




3 




Bit : ready 

1 : on line 

2 : unsafe 
3: - 

4 : on line 

5 : end of cylinder 
6: - 

7 : seek incomplete 




4 




Bit 0-7: - 



Bit 0-7: command in progress when overflov 
incomplete occurs 



2314/2319 - Direct Access Storage 
Sense Byte Desig 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 



data check in count area 

track overrun 

end of cylinder 

invalid sequence 

no record found 

file protect 

missing address marker 

overflow incomplete 

: SERDES check 

: ALU check 

: unselected status 



SENSE INFORMATION SUMMARY (... Continued) 



2314/2319 - Direct Access Storage 
Sense Byte Desig 



0: busy 

1 : on line 

2 : unsafe 

3 : wr current sense 

4 : pack change 

5 : end of cylinder 

6 : mulfi-module select 

7 : seek incomplete 

: wrong length record (2314 with 

multiplex storage control feature 
only) 

1 : pending status (2314 with multiplex 

storage control feature only) 



3: - 



: - 






: Module indent if icatic 




bits 4567 


phys 


cal drive 


0000 




A 


0001 




B 


0010 




C 


0011 




D 


0100 




E 


0101 




F 


0110 




G 


0111 




H 


1000 




J 


mi 


module not def 



2321 - Data Cell 



Bit 0-7: command in progress when overflow 
incomplete occurs. 



Sense Byte 


Designation 





Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 




5 : overrun 

6 : track condition check 

7 : seek check 



SENSE INFORMATION SUMMARY (. . .Continued) 



2321 - Data Cell (. . .Continued) 
Sense Byte 



Designation 


Bit 




1 


: data check in count area 
track overrun 




2 


end of cylinder 




3 


invalid sequence 




4 


no record found 




5 


file protect 




6 


missing address marker 




7 


overflow incomplete 


Bit 





unsafe 




2 


serializer check 




3 


- 




4 


ALU check 




5 


unselected file status 




6 


- 




7 


" 


Bit 



1 


drive ready 
drive operative 




2 


read safety 




3 


write safety 




4 


strip ready 




5 


invalid address 




6 


auto restore 




7 


CE cell located 



Bit 0-7:command in progress when overflo\ 
incomplete occurs 



2400 - Magnetic Tape 
Sense Byte 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 



overrun 

word count zero 

data converter check 



SENSE INFORMATION SUMMARY (.. .Continued) 



2400 - Magnetic Tope (.. .Continued) 



Sense Byte 



: noise 
1-2 : B'00' =not existent 
B'OT =not ready 
B'lO" = reody and not rewinding 
B'll' = ready and rewinding 

3 : seven-track 

4 : at loadpoint 

5 : selected and write status 

6 : file protect 

7 : not capable 



Jit 0-7: contains the frack-In-error indicator 
bits that are set at the end of a read, 
or read-backward command if a data 
check has been encountered. Bits 6 
and 7 on together indicate either more 
than one error or no error found. 



: R/W VRC 

1 : LRCR 

2 : skew 

3 : CRC 

4 : skew register VRC 

5 : phase encoding 

6 : backward 

7 : C compare 

: echo check 

1 : reject TU 

2 : read clock error 

3 : write clock error 

4 : delay counter 

5 : sequence indicator C 

6 : sequence indicator B 

7 : sequence indicator A 



2495 - Tape Cartridge Reader 
Sense Byte 



: command reject 

: intervention required 

: bus-out check 

equipment check 

data check 

shou!d-nof -occur 

position check 
: should-not-occur 



SENSE INFORMATION SUMMARY (. . .Continued) 



2501 - Card Reader 



Sense Byte 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : - 
7: - 



2520 - Card Read-Punch/ Card Punch 
Sense Byte Designa 



: command reject 

1 : intervention requiri 

2 : bus-out check 

3 : equipment check 

4 : data check 



2540 - Card Reader/Card Punch 



Sense Byte 




Designatior 



command reject 
intervention required 
bus-out check 
equipment check 
data check 

unusual command 



2560 - Multifunction Card Machine 



Sense Byte 



Designation 

Bit : command reject 

1 : intervention required 
2: - 

3 : equipment check 

4 : data check 

5 : feed/machine check 

6 : no card available 

7 : print operation in progress 



SENSE INFORMATION SUMMARY (...Continued) 



2560 - Multifunction Card Machine (. . .Continued) 



: cover interlock/punch pusher check 

1 : jam bar check 

2 : corner station check 

3 : call 8 to 9 feed check 

4 : print station feed check 

5 : punch station feed check 

6 : read station feed check 

7 : input station feed check 



Location of individual card : 
Bit : secondary select 

1 : card in punch station 

2 : preprint SC7 exposed 

3 : prepunch SC5 exposed 

4 : prepunch SC4 exposed 

5 : preread SC 3 exposed 

6 : preread SC2 exposed 

7 : input station SCI exposed 

Stacker Select Informatio 
Bit : primary card 

1 : binary 

2 : binary 



e2 
e 1 

4 : secondary card 1 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 

Stacker Select Informatio 
Bit : primary (0) 

secondary (1) 

1 : binary value 4 

2 : binary value 2 



3: bin 



alue 1 



4 : primary (0) 

secondary (1) 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 



card at primary 
prepunch station 



card at secondary 
prepunch station 



card at punch o 
preprint station 



SENSE INFORMATION SUMMARY (...Continued) 



2560 


- Multifunctio 


n Card Machine (. . .Continued) 






Sense Byte 


Designation 






5 


Stacker Select Information 
Bit : primary (0) 

secondary (1) 

1 :4 

2: 2 

3: 1 


card at corner station 






4 : primary (0) 

secondary (1) 
5: 4 
6: 2 
7: 1 


card in stacker pocket 
(was just stacked) 



Card column in which first (possibly only) 

error was detected : 

Bit : multi data check 

1 : binary value 64 

2 : binary value 32 

3 : binary value 16 



4: bin 



binary v 
binary v 



alue 8 
ilue 4 



7 : binary value 1 



2596 - Card Read-Punch 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus -out check 




3 : equipment check 




4 : data check 




5 : overrun 




6: - 




7: - 



2671 - Paper Tape Reader 



Sense Byte 




: command reject 

1 : intervention required 

2 : bus -out check 

3 : equipment check 

4 : data check 
5: - 

6: - 
7: - 



SENSE INFORMATION SUMMARY (...Continued) 



: command reject 

: intervention required 

: equipment check 

: data check 

: chain buffer parity check 

: no channel found 

: channel 9 



: interlock (chain gate open) 

1 : form check (jam) 

2 : coil protect check 

3 : subs can ring check 

4 : chain buffer address register check 

5 : hammer unit shift check (model 1 only) 

6 : any hammer on check 
7: device ready check 



Jit 

1 



carriage inhibit check 



step check 
move check 



Jit : hammer reset failure check 



no fire check 

misfire check 

print data buffer parity check 

check bit buffer parity check 

chain buffer parity check 

buffer address register check 

clock check 



Bit : open coil check 
1-7: - 



3210/3215 - Console Printer Keyboard 



Sense Byte 



Designation 

Bit : command reject 

1 : intervention required 
2: - 

3 : equipment check 
4-7: - 



SENSE INFORMATION SUMMARY (...Continued) 



3211 


- Printer 








Sense 


i Byte 


Designation 








1 




Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : buffer parity check 

6 : load check 
7: channel 9 

Bit : command parity 

1 : print check 

2 : print qualify 

3 : line position check 

4 : forms check 

5 : command suppress 

6 : mechanical motion 

7 : - 






2 




Bit : carriage failed to move 

1 : carriage sequence check 

2 : carriage stop 

3 : platen failed to advance 

4 : platen failed to retract 

5 : forms jam 

6 : ribbon motion 

7 : train overload 






3 




Bit : UCSB parity 

1 : PLB parity 

2 : FCB parity 

3 : coil protect 

4 : hammer fire check 

5 : service aid 

6 : UCSAR sync check 

7 : PSE sync check 






4 




Bit 0-7 : information used by servi 


ice personnel 




5 




Bit 0-7:- 




3272. 


- (3270 Local) 








Sense 


Byte 


Designation 











Bit : command refect 

1 : intervention required 

2 : bus out check 

3 : equipment check 

4 : data check 

5 : unit specify 

6 : control check 

7 : operation check 




3330. 


- Disk Storage 


Designation 






Sense 


Byte 











Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 





SENSE INFORMATION SUMMARY (...Continued) 



3330 - Disk Storage (. . .Continued) 



Sense Byte 
1 



Designation 



: permanent error 

1 : invalid track format 

2 : end of cylinder 
3: - 

4 : no record found 

5 : file protected 

6 : write inhibited 

7 : operation incomplete 



correctable 
environmental data present 



Bit 0-7: restart command 

Bit 0-l:storage control identificatioi 

2-7:physical drive idenfificatio 

bits 2 to 7 physical dri- 



1 1 1000 A 

110001 B 

101010 C 

100011 D 

011100 E 

010101 F 

001110 G 

000111 H 

Bit 0-7:identify the eight low-order bits of 

the cylinder address in the most recent 
seek argument 

Bit : reverse 

1 : cylinder number (high order bit of 

cylinder address) 

2 : difference 

3: 16 ) 



5:4) head number 
6: 2 ) 



Jit 0-3:format type of remaining sense bytes (8-23) 
4-7 : encoded error message 



Meaning depends on format type 



SENSE INFORMATION SUMMARY (...Continued) 



3340 - Disk Storage 



Sense Byte 



Designation 


Bit 



1 

2 
3 

4 


: command reject 
: intervention required 
: bus-out check 
: equipment check 
: data check 




5: 
6; 
7: 


: overrun 

: track condition check 

: seek check 


Bit 


0: 
1 : 
2: 

3: 
4: 
5: 
6 : 
7: 


: permanent error 

: invalid track format 

: end of cylinder 

: no record found 
: file protected 
: write inhibited 
: operation incomplete 


Bit 


: 

1 : 
2: 
3: 
4: 
5: 


: RPS feature present 
: correctable 

: environmental data pr 



6 : data module size) 01 = 35MB 

7 : data module size) 10 = 70MB 

Bit 0-7:restart command 

Physical drive identification : 
Bit : drive A 

1 : drive B 

2 : drive C 

3 : drive D 

4 : drive E 

5 : drive F 

6 : drive G 

7 : drive H 

Bit 0-7:lndentifies the eight low-order bits of the 
cylinder address in the most recent seek 
argument 

Bit 0-2: identifies the three high-order bits of the 
cylinder address 
3: - 

4: 8 ) 

, ' , head number 

o : L ) 

7: 1 ) 



SENSE INFORMATION SUMMARY (■ 

3340 - Disk Storage (...Continued) 
Sense Byte Designa 



Bit 0-3:format type of remaining si 
(8-23) 
4-7:encoded error message 

Meaning depends on format type 



3410/3411 - Magnetic Tape 
Sense Byte 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

6 : word count zero 

7 : data converter check 

Bit : noise 

1-2 : B'00' = non-existent 
B'01' = not ready 
B'10 1 = ready and not busy 
B'l 1 ' = ready and busy 

3 : seven track 

4 : at load point 

5 : write status 

6 : file protected 

7 : not capable 

Bit 0-7:track in error bits 

Bit : VRC 

1 : multiple track error (PE) or LRC (NRZI) 

2 : skew 

3 : end data check (PE) or CRC (NRZI) 

4 : envelope check (PE only) 

5 : phase encoding 
6 : backword 

7: - 

Bit : tape unit positioning check 

1 : tape unit reject 

2 : end of tape 
3: - 

4: - 

5 : diagnostic track check 

6 : tape unit check 
7: illegal command 



SENSE INFORMATION SUMMARY (...Continued) 



3410/341 1 - Mognetic Tope (.. .Continued) 



Sense Byte 



Designation 

Bit 0-1: new subsystem 

2 : write tape mark check 

3 : PE identification burst 

4 : PE compare 

5 : tachometer check 

6 : false end mark 
7: RPO 



Bit 



: seven track 

1 : short gap mode 

2 : dual density 
4-7 : tape unit model 

Bit : lamp check 

1 : left column check 

2 : right column check 

3 : ready reset 

4 : data security erase 
5-7: - 



Jit 
1 
2 



end velocity check 
no read-back data 
start velocity check 



3420/3803 - Magnetic Tape 



: command reject 

: intervention required 

: bus -out check 

: equipment check 

: data check 

: overrun 

: word count zero 

: data converter check 



SENSE INFORMATION SUMMARY (. . .ConKnued) 
3420/3803 - Magnetic Tape ( Continued) 



Bit U : noise 

1-2 : B'00' = non-existent 
B'01' = not ready 
B'10' = ready and not rewinding 
B'll' = ready and rewinding 

3 : seven track 

4 : at load point 

5 : write status 

6 : file protected 

7 : not capable 

Bit 0-7: track in error bits 

Bit : VRC 

1 : multiple track error (PE) or LPC (NRi 
2 : skew 

3 : end data check (PE) or CRC (NRZI) 

4 : envelope check (PE only) 
5 : phase encoding 

6 : backward 
7: C-compare 

Bit : ALU hardware error 

1 : reject tape unit 

2 : tape indicate 

3 : write trigger VRC 

4 : microprogram detected error 
5: LWR 

6 : tape unit check 

7 : RPQ 

Bit : new subsystem 

1 : new subsystem 

2 : write tape mark check 

3 : PE ID burst check 

4 : start read check 

5 : partial record 

6 : excessive postable or tape mark 
7: RPO 

Bit : seven track 

1 : write current failure 

2 : dual density 

3 : NRZI density 
4-7: tape unit model 

Bit : lamp failure 

1 : tape bottom left 

2 : tape bottom right 

3 : reset key 

4 : data security erase 

5 : erase head 

6 : air bearing pressure 
7: load failure 



SENSE INFORMATION SUMMARY (...Continued) 

3420/3803 - Magnetic Tape (. . .Continued) 
Sense Byte Designation 



Bit : IBG drop while writing 

1 : feed through check 

2 : SDR counter 

3 : early begin readback check 

4 : early ending readback check 

5 : slow begin readback check 

6 : slow ending readback check 

7 : velocity retry/restart 

Bit : SDR counter 

1 : velocity change during write 
2-3 : SDR counter 
4: - 
5: - 
6: - 
7 : tape control reserved 

Bit : command status reject 

1 : - 

2 : control status reject 

3 : no block on record readback check 

4 : WTM not detected block 

5 : tachometer start fail 
6: - 

7 : velocity check 

Bit : Bbus parity error, ALU 1 

1 : - 

2 : low ROS parity/low IC/ parity 
on branch instr. 

3 : high IC/high ROS reg parity 

4 : micro program detected hardware error 

5 : D bus parity error, ALU1 
6: - 

7 : branch condition error, ALU2 

Bit : B bus parity error, ALU 2 

1 : - 

2 : low ROS parity/low IC/parity on branch instr. 

3 : high IC/BC/high ROS reg parity 

4 : microprogram detected hardware error 

5 : D bus parity error, ALU 2 
6: - 

7 : branch condition error, ALU 2 

Bit 0-l:tape control density 

2-7:tape control unique ID high 

Bit 0-7: tape control unique ID low 



SENSE INFORMATION SUMMARY (. . .Continued) 



17 



3420/3803 - Magnetic Tope (...Continued) 
Sense Byte Designation 

15 
16 



Bit 0-7:tape unit unique ID 
Bit O-7-.tape unit unique ID 



Bit : two-channel switch 

1-3 : tape control device switch features 
4-7 : EC level of tape control 

Bit : Power check/air flow 
1-3: - 
4-7 : EC level of tape unit 

Bit : primed for device and tape uni 

1 : primed for device and tape uni 

2 : primed for device and tape uni 

3 : primed for device and tape uni 

4 : primed for device and tape un 

5 : primed for device and tape un 

6 : primed for device and tape unit 1 

7 : primed for device and tape unit 

Bit : primed for device and tape un 

1 : primed for device and tape un 

2 : primed for device and tape un 

3 : primed for device and tape un 

4 : primed for device and tape un 

5 : primed for device and tape un 

6 : primed for device and tape un 

7 : primed for device and tape un 



Sit 0: 



load button depressed 
left reel turning 
right reel turning 
tape present 
reels loaded 
load rewind 
load complete 
load check 



Bits 0-7:FRU Identifiers for tape control 
Bits 0-7: FRU identifiers for tape control 



SENSE INFORMATION SUMMARY (...Continued) 



3504/3505/3525 - Card I/O 
Sense Byte 




Designatic 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5: - 

6 : abnormal format reset 

7 : permanent error key 

Bit : permanent error 

1 : automatic retry 

2 : motion malfunction 

3 : retry after intervention complete 
4-7: - 

Used for diagnostic purposes only. 



3540 - Diskette 



Sense Byte 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5-7: - 

Bit : permanent error 

1 : automatic retry 

2 : motion malfunction 

3 : retry after intervention complete 

4 : special record transferred 
5-7: - 

Used for diagnostic purposes only 

Bit 0-7:cylinder address in binary 

Bit 0-7:head address, must be binary zero 

Bit 0-7:record address in binary 



SENSE INFORMATION SUMMARY (...Continued) 

3881 - Optical Mark Reader 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 
4: - 

5: - 

6 : unusual command sequence 

7: - 

3886 - Optical Character Reader 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 
4: - 




5: - 




6 : non-initialized 




7 : RCP error 


1 


Bit : - 




1 : mark check 




2 : invalid format 




3: - 




4 : incomplete scan 
5: - 




6 : non-recovery 

7 : outboard 



Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : - 

3 : equipment check 

4 : data check 

5 : chain buffer parity check 
6 : no channel found 

7 : channel 9 



SENSE INFORMATION SUMMARY (...Continued) 

5203 - Printer (. . .Continued) 

Sense Byte Designation 

1 Bit 0-7:- 



Bit : interlock (chain gate open) 

1 : forms check (jam) 

2 : coil protect check 

3 : subscan ring check 

4 : chain buffer address register check 

5 : hammer unit shift check 
6 : any-hammer-on check 
7 : thermal overload 

Bit 0-7:- 

Bit : hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register check 

7 : clock check 

Bit : open coil check 
1-7: - 



5425 - Multifunction Card Unit 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5: - 

6 : no card available 
7: - 

Bit : read check 
1 : punch check 
2: - 

3 : print data check 

4 : print clutch check 

5 : hopper check 

6 : feed check 



SENSE INFORMATION SUMMARY (...Continued) 
5425 - Multifunction Cord Unit (.. .Continued) 



Bit : - 

1 : - 

2 : card in primary wait station 

3 : card in secondary wait station 

4 : NPRO allowed 

5 : hopper cycle not complete 

6 : card in transport counter bit 2 

7 : card in transport counter bit 1 

Contains a hexadecimal number whose 
value can represent feedchecks and 
emitter checks in the 5425 

Defines the card column group and tier 
where the error was detected which caused 
the first read check or punch check of a 
card cycle : 
Bit : multiple error 
1-2 : B'OO' Tier 1 

B'GT Tier 2 

B'10' Tier 3 
3-7: B '00000' column group 1 

B'OOOOT column group 2 

B'illlT column group 32 

Bit : D row miscompare 

1 : C row miscompare 

2 : B row miscompare 

3 : A row miscompare 

4 : 8 row miscompare 

5 : 4 row miscompare 

6 : 2 row miscompare 

7 : 1 row miscompare 

Forms a table of the five most recent command strings 
Bit : Secondary 

1 : print four lines 

2 : stacker select M2 

3 : stacker select M3 

4 : punch 

5 : feed command sample 

6 : print 

7 : read 



SENSE INFORMATION SUMMARY (...Continued) 
DOC - Display Operator Console 

Sense byte Designation 

Bit : command reject 

1 : intervention required 

2: - 

3 : equipment check 

4: - 

5: - 

6: - 

7 : operation check 



THIS PAGE HAS BEEN ADDED FOR YOUR OWN NOTES 



THIS PAGE HAS BEEN ADDED FOR YOUR OWN NOTES 



CHAPTER II 

DOS/VS GENERAL INFORMATION 



IPL CONTROL STATEMENTS 



Operation 


Operand 


Remarks 


ADD 


XWCMLdevicetypeLX'ss' "I 


Add a de 


• ice to the PUB table. 




LX'ssss' 


X'cuu': 


Channel and unit number 




^X'ssssss'J 


(k): 


Can be specified as either 
(S) or a decimal number 
from to 255. 
(S) indicates that the de- 
vice can be switched (that 
is, physically attached to 
two adjacent channels). 
The designated channel is 
the lower of the two chan- 
nels. 

(0)-(255) indicates the 
priority of a device that 
cannot be switched, with 
indicating the highest pri- 
ority. If (k) is not given, 
the assumed priority is 255 






device 


actual device (See device 






type: 


codes list) 






X'ss' 


device specification (See 






X'ssss' 


ASSGN statement). If 






X'ssssss': 


absent the following values 
are assigned: 
X'CO' for 9-track tapes 
X'90' for 7-track tapes 
X'OO" for nontapes. 
X'00 , ,X , 0r,X'02 , and 
X'03 1 are invalid as X'ss' 
for magnetic tape. 

X'ss' specifies SADxxx 
(Set ADdress) requirements 
for IBM 2702 lines: 
X'OO' for SADO 
X'OT for SAD1 
X'02' for SAD2 
X'03' for SAD3 

X'ss' is required for MICR/ 
OCR device types. It spe- 
cifies the external inter- 
rupt bit in the old PSW, 
which is used by this device 
to indicate "read complete' 
The specifications are: 
X'OT PSW bit 31 
X'02' PSW bit 30 
X'04' PSW bit 29 
X'08' PSW bit 28 
X'10' PSW bit 27 
X'20' PSW bit 26 



IPL CONTROL STATEMENTS (. . . .Cont'd) 



Operation 


Operand 


Remarks 


ADD 
(Cont'd) 




The X'ss" parameter specifies whether 
or not the error correction feature is 
present on an IBM 1018 Paper Tape 
Punch with 2826 Control Unit. These 
specifications are: 
X'OO' No error correction feature 
X'OT Error correction feature 

For the ICA of theM 115/125, X'ss' 
X'ssss' or X'ssssss' is used to specify 
the line mode setting for a Start/Stop 
line or a BSC line. This is not accept- 
ed on the ASSGN statement. 
If a one or two byte value is specified 
the specified value is right-justified 
and the rest of the three bytes is filled 
with zeros. 

Note: Optional statement; if required 
it must be entered before SET command 


CAT 


UNIT=X'cuu' 


Assigns the system logical unit SYSCAT 
X'cuu': Indicates the hexadecimal 
channel (c) and unit (uu) 
number of the device that is 
to contain the VSAM 
master catalog. 

Note: Optional statement; if required 
the CAT command must follow the SET 
command and precede the DPD com'd. 


DEL 


X'cuu' 


Delete a device from the PUB table. 
X'cuu': Channel and unit number. 

Note: Optional statement; if required 
it must be entered before SET command 


DPD 


[TYPE=M][,UNIT= X'cuu', 
CYL= xxx][, VOLID= xxxxxx] 


Defines the page data set. 
TYPE= N: Indicates that the page 
data set need not be for- 
matted and the extent 
limits have not been 
changed. 
If TYPE= N is specified but the page 
data set does not exist or the extent 
limits have been changed, TYPE= N 
is ignored and the page data set is 
formatted during IPL. In this case, the 
UNIT and CYL operands must either 
have been supplied during system ge- 
neration, or they must be specified in 
the DPD command. 



IPL CONTROL STATEMENTS (.. ..Cont'd) 



DPD 
(Cont'd) 



TYPE= F indicates that the page data 
set is to be formatted during IPL. For- 
matting during IPL is required if the 
page data set is to be extended or if 
it is to be reallocated. 

UNIT= X'cuu' specifies the channel 
and unit number of the 
device that is to contain 
the page data set. If 
UNIT is specified, CYL 
must also be specified. 

CYL= xxx : Specifies the sequential 
number of the cylinder, 
relative to zero, where 
the page data set is to 
begin. (The size of the 
page data set extent is 
calculated by the system) 
If CYLisspecified,UNIT 
must also be specified. 

VOLID=xxxxxx identifies the alpha- 
numeric volume serial no 
of the disk pack that con- 
tains the page data set. 
If this operand is omitted 
both during system gene- 
ration and in the DPD 
command, the volume 
serial number is not 
checked. 

Notes: Required statement. The DPD 
command must be the last command 
entered during IPL procedures. 

The operands of the DPD command may 
be given in any order. 



[ DATE= valuel [,CLOCK=va!ue2 ]] 
J/hh/mm] 



UONE-im 



ng 



1: In one of the follow 

formats: mm/dd/yy 
dd/mm/yy, 
mm: month (01-12) 
dd : day (01-31) 
yy : year (00-99) 

2: In the following format: 

hh/mm/ss, 
hh : hours (00-23) 
mm: minutes(00-59) 
ss : seconds(00-59) 

: Specifies a geographical 

position east of Green- 
wich. 



1PL CONTROL STATEMENTS (. . . .Cont'd) 



Operation 


Operand 


Remarks 


SET 
(Cont'd) 




WEST: Specifies a geographical 
position west of Green- 
wich. 

hh/mm: A decimal value which 
indicates the difference 
in hours and minutes be- 
tween local and Green- 
wich Mean Time, 
hh: 0-12 
mm: 0-59 

Note: Required statement. If any ADD 
or DEL commands are required, they 
must precede the SET command. 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS 



Operatic 



Operand 



Accepted 
by 



Fl = nK [,F2=nK] 
C,F3=nK: L",F4=nK] 



Allocates foreground program 
areas in the virtual address area 
Value of n is an even number. 
The order of operands is 
arbitrary. At least one operand 
must be specified. 



[BGR=nK] [,FlR=nK] 
C,F2R=nK]C,F3R=nlG 
[,F4R=nK] 



Allocates real address area 
among foreground and back- 
ground programs. Value of n is 
an even number. The order of 
operands is arbitrary. At least 
one operand must be specified. 



Alters 1 to 16 bytes of virtual 
storage. XXXXXX is the hex 
address where alteration is to 
start. 



LV/3 



For remarks see end of this 
statement 



UA 

IGN U' PERM J 

'address-list)| 
I SYSyyy J 

X'cuu 1 

(address-list) 

SYSyyy 

DISK 

2311 

3330 

2314 

3340 



["/TEMPI 



l/TEMP] 

'[perm] 



JCS 
JCC 



L~, VOL= volsernojT, SHR3 




X'cuu' 
(address-list) 
•SYSyyy 
TAPE 
2400T7 
2400T9 
3410T7 
3410T9 
3420T7 
3420T9 

11-05 



["x'ss'l TtempI 

[ALT J L,PERMJ 



r,VOL=volsernol 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (■ ■ ■ .Cont'd) 



Accepted 
by 



ASSGN 
(Cont'd) 



For printers: 



For remarks see 

end of this statement 



X'cuu' 

(address- list) 

SYSyyy 

PRINTER 

1403 

1403U 

1443 

3203 

3211 

5203 

5203U 



For card (read) punches: 



,TEMP | 
,PERM 



(address-list) 

SYSyyy 

PUNCH 

1442N1 

1442N2 

2520B1 

2520B2 

2520B3 

2540P , 



2560 

2596 
3525P 
3525RP 



W 



.[temp] 
^permJ 



For card readers: 



X'cuu' 

(address- list) 

SYSyyy 

READER 

1442N1 

2501 

2520B1 

2540R 

2560 

2596 
3504 
3505 
3525RP_ 

5425 



? 



[temp I 
LpermI 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (Contd). 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




ASSGN 






can be SYSRDR, SYSIPT, SYSIN, 






SYSxxx : 




(Cont'd) 




X'cuu': 
address- list : 

UA: 
IGN: 

SYSyyy: 
device-class: 
device-type: 
X'ss': 


SYSPCH, SYSLST, SYSOUT, 
SYSLOG, SYSLNK, SYSREC, 
SYSRLB, SYSSLB, SYSCLB 
(JCC only,), or 
SYSOOO-SYSnnn. 

c= 0-6. 

uu=00-FE (0-254)inhex 

a list of up to seven device 
addresses in the form: 
(X'cuu 1 , .. ., X'cuu') 

unassign 

unassign and ignore (invalid 
for SYSCLB, SYSRDR, SYSIPT, 
SYSIN) 

any system or programmer logical 
unit. 

READER, PRINTER, PUNCH, 
TAPE, DISK, or DISKETTE 

device code of any supported 
device 

density (magn.tape only) 

ss BPI Parity Transl. Conv. 
feat feat 

10 200 odd off on 
20 200 even off off 
28 200 even on off 
30 200 odd off off 
38 200 odd on off 
50 556 odd off on 
60 556 even off off 
68 556 even on off 
70 556 odd off off 
78 556 odd on off 
90 800 odd off on 
A0 800 even off off 
A8 800 even on off 
BO 800 odd off off 
B8 800 odd on off 
CO 800 single dens 9 tr. 
CO 1600 single dens. 9 tr. 
CO 1600 dual dens. 9tr. 
C8 800 dual dens. 9 tr. 
DO 6250 single dens. 9 tr. 
DO 6250 dual dens. 9 tr. 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. ■ . . Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




ASSGN 
(Cont'd) 






E 




ALT: 
HI: 

H2: 

PERM: 
TEMP: 
VOL=volserno : 

SHR: 


specifies alternate tape unit. 
(Invalid for SYSIPT) 

specifies input hopper 1 for input 
on 2560 or 5425; is assumed if 
neither HI nor H2 is specified. 

specifies input hopper 2 for input 

on 2560 or 5425; 

(invalid for programmers units) 

the assignment is permanent 

the assignment is temporary 

volume serial number of the tape 
or disk required. 

indicates the shared option for dis 










BATCH 


where n= 1,2,3 or 4 


Start or continue processers 


AR 




CANCEL 


where n= 1,2, 3 or 4 


Cancels execution of current Job 
in specified area 


AR 




CANCEL 


blank 


Cancels execution of current job 


JCC 


[//] 


CLOSE 


S 


YSxxx , 
LX'cuu'CX'ss'J 
,UA 1 
UGN f 

},ALT J 




SYSxxx : for magnetic tape 
SYSPCH 
SYSLST 
SYSOUT 
SYSOOO-SYSnnn 

for DASD (JCC only) 

SYSIN 

SYSRDR 

SYSIPT 

SYSPCH 

SYSLST 
X'cuu', X'ss', UA, IGN, ALT: 
Values as described in ASSGN 
command. 


JCS 
JCC 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


DATE 


mm/dd/yy or 
dd/mm/yy 


mm: month (01-12) 
dd : day (01-31) 
yy : year (00-99) 


JCS 


// 


DLAB 


Mabel fields 1-3' C 
xxxx , yyddd , yyddd , 


'label fields 1-3': first three 
fields of Format 1 DASD 
file label. Is a 51 -byte 
character string, contain- 
ed within apostrophes and 
following by a comma . 
Entire 51-byte field must 
be contained in the first 
of the two statements. 
Field 1 is the file name 
(44-byte alphameric); 
field 2 is the format iden- 
tifier (1-byte numeric); 
field 3 is the file serial 
number (6-byfe alphameric) 

C: Any nonblanc character 
in column 72. 

xxxx: Volume sequence number 
(4-digit num. ) Must begin 
in column 16 of the con- 
tinuation statement. 
Columns 1-15 are blank. 

yyddd, File creation date follow- 

yyddd: ed by file expiration date. 
Each is 5-digit numeric. 

'system-code' : Not required. 

When used, a 13-character- 
string within apostrophes. 

type: SD, DA, ISC or ISE. If om- 
itted, SD is assumed. 


JCS 


// 


DLBL 


filename, ['file-ID'], 
[date J, [codes!, 
[,DSF ][,BUFSP^] 
[,CAT=filename] 
(See Note 1) 


filename : One to seven alpha- 
meric characters, the 
first of which must be alp 
'file-ID': One to forty-four alpham 
characters (one to eight c 
meric characters for the 
diskette) 
date : One to six characters(yy/ 
codes : Two to four alphabetic cl 
ters(SD,DA,DU,ISC,ISE 
DSF : specifies that a data secu 
file is to be created or pr 
BUFSP=n: specifies, for a VSAM file 
processed, the number of 
of virtual storage(0-9999 
be allocated as bufferspa 
CAT=fi!ename : specifies filename ( 
alphameric characters)of the DLBL s 
ment for the catalog owing this VSA 


JCS 




labetic 
eric 
IpHa- 
3540 

ddd) 
arac- 
VSAM) 
red 

ocessed 
to be 
bytes 
99) to 
ce 

1 to 7 
ate- 
Mfile. 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



*" 


Operation 


Operand 


Remarks 


Accepted 
by 




DSPLY 


xxxxxx 


Displays 16 bytes of virtual sto- 
rage 


AR 




DUMP 




blank 1 
S 

BG 
Fn 
BGS 
FnS 

PDAREA 
.address, adc 
where n=l,2 


H' 

ressj 
,3 or 4 


Dumps specified areas of virtual 
storage 

.Parameter causes dump on the 
SYSLST assigned to the specified 
partition. Default is BG SYSLST. 

blank: General registers plus 
all real and virtual 
partitions currently 
occupied by programs 

S: General registers, all 
real and virtual parti 
tions currently occu- 
pied by programs, and 
supervisor area 

BG, Fn: applicable real or vir- 
tual partition current- 
ly occupied by progr. 
and associated regis- 
ters 

BGS, FnS: Applicable real or 

virtual partition cur- 
rently occupied, re- 
gisters and supervisor 
area 

PDAREA: PD table, PD area and 
AAA 

address. Specified storage area 

address: between the two hexa- 
decimal addresses and 
associated registers 


AR 




DVCDN 


X'cuu' 


X'cuu': c=0-6 

uu= 00-FE(0-254) in 
hex 


JCC 




DVCUP 


X'cuu' 


X'cuu': c=0-6 

uu= 00-FE(0-254) in 
hex 


JCC 




END or 
ENTER 


blank 


End of SYSLOG communications 
END for the 3210 and 3215 prin- 
ter keyboards 
ENTER for DOC 


JCC 

AR 




ENDSD 


blank 


Terminates execution of SD aids 
program 


AR 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


r//] 


EXEC 








JCC 
JCS 


J LT[PGM=j" prognamej C,REALl L~,SIZE=size Jjl 
]_ PROC= procname L",OV] J 






PGM= progname : one to eight al- 
phameric characters. 
Used only if the pro- 
gram is in the core 
image library 

REAL The respective program 
is to be executed in 
real mode 

SIZE=sfze: can be nK, AUTO, or 
(AUTO,nK) 
nK : size of area 

required 
AUTO : take program 

size 
(AUTO,nK) : take 

program size plus 
nK 

PROC= procname : Name of cata- 
loged procedure to 
be retrieved. One to 
eight alphameric 
characters, the first 
of which must be 
alphabetic. 

OV: Indicates that overwrite 
statements follow EXEC 
statement 


// 


EXTENT 


Csymbolic unit"], 
Cserial number], 
Ctypel, Csequence 
number], Crelative 
track], Cnumber of 
tracks], Csplit 
cylinder track], 
LB=bfns] 


symbolic unit : Six alphameric 
characters 

serial number : One to six alpha- 
meric characters 

type : One numeric cha- 

sequence One to three nume- 
number : ric characters 
relative track : One to five nume- 
ric characters 
number of One to five nume- 
tracks: ric characters 
split cylinder One or two nume- 
track : ric characters 
bins : One or two nume- 
ric characters 


JCS 




HOLD 


HHHH 


Causes the assignments for the 
specified foreground partition(s) 
to remain in affect until the 
end of the next job 


JCC 




IGNORE 


blank 


Ignore abnormal condition 


AR 
JCC 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



No m e 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


JOB 


obname Caccounting 
'nformatfonU 


jobname: One to eight alpha- 
meric characters 
accounting information: One 
to sixteen characters 


JCS 


// 


LBLTYP 


/TAPE T(nn)]l 
[NSD (nn) j 


TAPE: Used when tape files 
requiring label infor- 
mation, are to be pro- 
cessed and no non -se- 
quential disk files are 
to be processed 

(nn): Optional and is present 
only for future expansion 
(ignored by job control) 

NSD: Nonsequential disk files 
are to be processed 

(nn): Largest number of ex- 
tents per single file 


JCS 




LFCB 


X'cuu ',phasename 
[, FORMS=xxxx] 
[, LPI=nH[, NULMSG3 


Causes the FCB of printer 
X'cuu' to be loaded 


AR 


[//J 


LISTIO 


'SYS 




Causes listing of I/O assignments 


JCS 






PROG 




on SYSLST for JCS and SYSLOG 


JCC 






Fn 




for JCC 








ALL 




(n= 1,2,3 or 4) 








< SYSxxx 












UNITS 












DOWN 












UA 












[ X'cuu" J 










LOG 


3 lank 


Causes logging of job control 
statements on SYSLOG 


JCC 
AR 




LUCB 


X'cuu ',phasename 

, folducnochk: 

\ TRAIN=xxxxxxl 
t NULMSGD 


Causes the UCB of printer 
X'cuu' to be loaded 


AR 




MAP 


j lank 


Causes a map of area in real and 
virtual storage to appear on 
SYSLOG 


JCC 

AR 




MODE 


IR 




AR 






CR 










CE, cuu 


, 1 C xx,y] 
, D Z, xx, y] 
, N 










STATUS 


) 








S[( 3 ]{K 


R l 


j 








Q 


T, E=eeeeJ & T=ttftJ> 








™L 


1 






1 







JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




MODE 
(Cont'd) 




Changes the mode of operation, 
changes the EFL threshold values 
and gives status information. 
Note: When HIR or ECC is speci- 
fied, at least one of the optional 
operands within these braces must 
be selected. TH is only valid for 
the Model 145 when ECC, C Is 
specified with the MODE command 






MSG 


where n= 1,2,3 or ^ 


Transfers control to message routine 


AR 


I//I 


MTC 


opcode, fsYSxxxl 


opcode: BSF, BSR, DSE, ERG, 

FSF, FSR, REW, RUN, 

or WTM 
SYSxxx: Any logical unit 
X'cuu': (only valid for JCC) 

c=0-6 uu=00-FE 

(in hex) 
nn: dec. number (01-99) 


JCS 
JCC 




NEWVOL 


m 


Indicates that a new volume has 
been mounted for the specified 
partition 


AR 




NOLOG 


blank 


Suppresses logging of job control 
statements on SYSLOG 


JCC 
AR 


// 


OPTION 


option 1 
C,option 2,... 3 


option : can be any of the 
following : 

LOG: Log control state- 
ments on SYSLST 

NOLOG Suppress LOG 

DUMP: Dump registers and 
temporary real or 
virtual partition on 
SYSLST in case of 
abnormal program 
end 

NODUMP: Suppress DUMP 
option 

LINK: Write output of 

language translator 
on SYSLNK for 
linkage editing. 

NOLINK: Suppress LINK opti 

DECK: Output object 

module on SYSPCH 

NO DECK : Suppress DECK 
option 

EDECK: Punch source macro 
definitions on 
SYSPCH 


JCS 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Operation 



Operand 



Accepted 
by 



OPTION 
(Cont'd) 



NOEDECK 
ALIGN 

NOALIGN 
LIST 

NOLIST 
LISTX 

NOLISTX 
SYM 
NOSYM 
XREF 

NOXREF 
ERRS 

NOERRS 
ACANCEL 



Suppress EDECK 

option 

Align constants 

and data areas on 

boundaries 

Suppress ALIGN 

option 

Output listing of 

source module on 

SYSLST 

Suppress LIST 

option 

Output listing of 

object module on 

SYSLST 

Suppress LISTX 

option 

Punch symbol deck 

on SYSPCH 

Suppress SYM 

option 

Output symbolic 

crossreference list 

on SYSLST 

Suppress XREF 

option 

Output listing of 

all errors in source 

program on SYSLST 

Suppress ERRS 

option | 

Cancel Job if attempj 
to assign device : - ' 
unsuccessful 
Await operator 
action if a device 
cannot be assigned 
Catalog program or 
phase in core image I 
library after comple- [ 
tion of linkage I 
editor run 
Causes all DASD or 
tape labels to be 

written on the | 

standard label trackTj 
Sub-library change 
from A/E to D/F 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




OPTION 
(Cont'd) 




USRLABEL Causes all DAS Dor tape 
labels to be written on 
the user label track 
PARSTD Causes all DASD or tape 
labels tobe written on 
the partition standard 
label track 
48C 48-character set 
60C 60-character set 
SYSPARM= Specifies a value for as- 
sembler system variable 
symbol and SYSPARM 




[//] 


OVEND 


[comments] 


Indicates end of overwrite state- 
ments for a cataloged procedure 


JCS 
JCC 


C//1 


PAUSE 


[comments] 


Causes pause immediately after pro- 
cessing this statement . PAUSE state- 
ment is always printed on SYSLOG. 
If no 3210,3215 orDOC is available 
the statement is ignored. 


JCS 
JCC 




PAUSE 


where n= l,2,3or4 


Causes pause at end of current job 
step or at end of Job 


AR 




PRTY 


[P1,P2[,P3[,P4[,P5J]J] 


Pn=BG,Fl,F2,F3orF4. Allows the 
operator to display or change the 
priority of partitions 


AR 


[//] 


RESET 


fSYS 1 
J PROG I 

Iall f 

[SYSxxxJ 


Resets I/O device assignments 


JCS 
JCC 




ROD 


blank 


Causes all SDR counters for all non- 
teleprocessing devices on the recor- 
der f i le on SYSREC to be updated from 
the SDR counters in main storage 


JCC 


// 


RSTRT 


SYSxxx,nnnn [file- 
name] 


SYSxxx: Symbolic unit name of the 
device on which the check 
point records are stored . 
CanbeSYSOOO-SYSnnn 

nnn: four character identifica- 
tion of the checkpoint re- 
cord to be used for restart 

filename: symbolic name of the 

DASD file to be used for 
restarting 


JCS 




SET 


[ UPSI=valuel] 

[,LINECT=value2] 

[,RCLST=value3] 

[,RCPCH=value4] 

[,RF=value5] 

[,DATE=value6] 

[,HC=value7] 


value 1:0,1 or X 

value2: standard number of lines for 
output on each page of SYSLST 
value3: decimal number indicating 
minimum number of SYSLST disk re- 
cords remaining to be written before 
operator warning 


JCC 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( 



SET 
(Cont'd) 



L",SVA= value 83 
[,SPL=value9] 



decimal number indi- 
cating mimimum number 
of SYSPCH Jisk records 
remaining to be 
written before operator 
warning 

defines to the system 
the status of the recorder 
file (IJSYSREC)on 
SYSREC used by the 
RMSR feature 

/YES Wile exists 
\CREATEf create file 
in one of the following 
formats: 

mm/dd/yy or dd/mm/ yy 
mm : month (01-12) 
dd : day (01-31) 
yy : year (00-99) 

fYES -I 
HC= < FTO \ 

[createJ 



RF= 



YES: 



NO: 



hard-copy file 

No recording 
performed 
CREATE: Create a hard- 
copy f i le 
storage size in the format 
nK, nKfor SVA and ^ 

GET VIS area, respectively 
specify CREATE to have (- 1 
the system directory list 
(SDL) built in the SVA. 



Accepted 
by 



H 



Same as BATCH 



where n=l,2,3 or 4 



blank 



Stops batched-job progr. processing 



filename, ['file-ID'], 
[date], [file serial 
number!, [volume se- 
quence number], 
[file sequence number], 
[generation number], 
[version number] 



filename : One to seven alpha- 
meric characters, the 
first of which must be 
alphabetic 
file-ID': One to seventeen al- 
phameric characters 

date: One to six characters 

(yy/ddd or d-dddd) 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (■ . . .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




TLBL 
(Cont'd) 


Note : For ASCII file 
processing the fourth 

and fifth operands are 
called set identifier 
and file section 
number, respectively 


fCfile serial number (EBCDIC): 1 

One to six alphameric charac- 

\ ten,} \ 

Cset identifier (ASCII) : Six 

[alphameric characters} J 

Cvolume sequence number "| 

< (EBCDIC)} l, 

[[file section number (ASCII)Dj 

One to four numeric characters-^ 

file sequence number : One to four 

numeric characters 
generation number : One to four 

numeric characters 

version number : One to two 

numeric characters 






TPBAL 


["] 


n= number of partitions in which 
processing can be delayed(0, 1,2,.. 
number of partitions minus one). 
Allows the operator to display or 
alter the status of the Tele- 
processing Balancing function. 


AR 


// 


TPLAB 


'label fields 3-10" 


'label fields 3-10' : Indicated 
fields of the standard tape file 

label for either EBCDIC 
or ASCII. A49-byte 
character string, 
contained within 
apostrophes 


JCS 


// 


TPLAB 


Mabel fields 3-10 C 
label fields 11-13' 


'label fields 3-10' : same as above 
C : Any nonblanc character 

in column 72 
label fields 11-13' : 20 character 
direct continuation of 
the same character string 
begun with fields 3-10 
(no blanks, apostrophes 
or commas separating) 


JCS 




UCS 


SYSxxx, phasename 
L",FOLDJ CBLOCKJ 
CNULMSG3 


Causes the 240-character universal 
character set contained in the core 
image library phase specified by 
phasename to be loaded as buffer 
storage in the IBM 2821 CU. 
SYSxxx must be assigned to a 1403 
or 5203 Printer with the UCS 
feature. 


JCC 




UNBATCH 


blank 


Terminates foreground processing 


JCC 


// 


UPSI 


nnnnnnnn 


n : 0, 1 or X 


JCS 


// 


VOL 


SYSxxx, filename 


SYSxxx: Can be SYSOOO-SYSnnn 
filename: One to seven alpha- 
meric characters, the 
first of which must be 
alphabetic 


JCS 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Operand 



Accepted 
by 



type, sequence, lower, 
upper, 'serial no.', 
SYSxxx C,B23 



1 for data area (no 
split cylinder) 

2 for overflow area 
(for indexed sequential 
file) 

4 for index area (for 
indexed sequential 
file) 

128 for data area 
(split cylinder) 
: sequence number of 
extent within multiex- 
tent file. Can be 
0-255 

Lower limit of extent 
in the form B.C.C.C, 

C 2 C 2 H 1 H 2 H 2 where: 
B,= for 2311 or 2314/ 

2319; 0-9 for 2321 



2314/2319; 00-19 for 

2321 

C 2 C 2 C 2 = 000-199 for 

2321 or 2314/2319; 

000-009 for 2321 

H, = for 2311 or 2314/ 

2319; 0-4 for 2321 
H 2 H 2 = 00-09 for 2311; 

00-19 for 2321 or 2314/ 

2319 

Note that the last four 

strips of subcell 19 are 

reserved for alternate 

track for 2321 
upper: Upper limit of extent 

in the same form as for 

lower limit, 
'serial no. 1 : 6-alphameric-charc- 

ter volume serial number 

contained within 

apostrophes 

Can be SYSOOO-SYSnnn 

for 2311 or 2314/2319; 

0-9 for 2321 



SYSxxx: 
B2: 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . ■ .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


ZONE 


{S£)""~ 


EAST: A geographical position 
east of Greenwich 

WEST: A geographical position 
west of Greenwich 

hh/mm: A decimal value which 
indicates difference in 
hours and minutes 
between local time and 
Greenwich Mean Time, 
hh may be in the range 
0-12; mm in the range 
0-59 


JCS 


/+ 


ignored 


L" comments]] 


Indicates end of procedure 


JCS 


/* 


ignored 


ignored 


Columns 1 and 2 are the only 
columns checked 


JCS 


/& 


ignored 


CcommentsJ' 


Columns 1 and 2 are the only 
columns checked. Comments 
appear on SYSLOG and SYSLST 
at EOJ 




* 




comments 


Column 2 must be blank 





Note 1: If the DLBL and EXTENT statements for a private core image library are in the 
input stream (that is, the information is not contained on the label cylinder), they must 
precede the ASSGN SYSCLB command. 



LINKAGE EDITOR CONTROL STATEMENTS 



Name Operation 



Operand 



Remarks 



name, origin [,NOAUTO] 
[,SVAaC,PBDYJ 



e: Symbolic name of the 

phase. One to eight 
alphameric characters 

in: Specifies the load ad- 

dress of the phase. 
Load address can be in 
one of the following 
formats: 

1) symbol [(phase)] 
[± relocation] 

2) *[± relocation] - ! * 

3) S[+ relocation] J 

* addresses relative to 
begin of virtual partition 

4) ROOT 

5) +displacement "I #t 

6) F +address / 
** absolute addresses 

Note: A phase is eligible for relo- 
cation by the relocating loader if 
its origin is specified as a relative 
address (formats 1-4 above). 
However, if a phase is relative to 
another phase whose origin is speci- 
fied as an absolute address (formats 
5 or 6 above), none of the phases 
can be made relocatable during this 
linkage editor execution. Refer to 
ACTION statement for additional 
information about the relocating 
loader. 

NOAUTO: Indicates that the auto- 
matic library lookup (AUTOLINK) 
feature is suppressed for both the 
private- and system relocatable libs. 
SVA: Indicates that the phase is 
SVA~-eligible. 

PBDY: Indicates that the phase is to 
be link-edited on a page boundery. 



[modulename] [, (name I ist)] 



If both operands are omitted the 
object module to be included is 
assumed to be on SYSIPT 

If the first operand is present, the 
object module is assumed to be in 
either the private- or the system 
relocatable library 

If the first operand is omitted and 
the second operand is present, the 
object module to be included is 
assumed to be in the input stream 
(SYSLNK) 



LINKAGE EDITOR CONTROL STATEMENTS (. . . .Cont'd) 



Name 


Operation 


Operand 


Remarks 




INCLUDE 
(Cont'd) 




modulename: Symbolic name of the 
module as used when 
cataloged in the relo- 
catable library. It con- 
sists of one to eight al- 
phameric characters 

(namelist): The Linkage Editor con- 
structs a phase from 
only the control sec- 
tions specified. The 
namelist is in the fol- 
lowing format: 
(cs name 1 , cs name2 , . . ) 
Entries within the pa- 
rentheses are the names 
of the control sections 
that are used to consti- 
tute the phase 


blank 


ENTRY 


[entrypoint] 


entrypoint: Symbolic name of an 
entry point 
If the operand field is 
blank, the Linkage 
Editor uses as transfer 
address the first signi- 
ficant address provided 
in an END record en- 
countered during gene- 
ration of the first phase 


blank 


ACTION 


[CLEAR, MAP, NOMAP, "1 
<NOAUTO,CANCEL,BG,Fl,V 
|.F2,F3,F4,REL,NOREL J 


Indicates Linkage Editor options: 

CLEAR: Indicates that the unused 
portion of the core image 
library will be set to 
binary zero before the 
beginning of the Linkage 
Editor function 

MAP: Indicates that SYSLST is 
available for diagnostic 
messages. In addition, 
a virtual storage map is 
printed on SYSLST 

NOMAP Indicates that SYSLST is 
not available when per- 
forming the linkedit 
function 

NOAUTO Indicates that the AUTO 
LINK function is to be 
suppressed 

CANCEL Cancels the job automa- 
tically if any of the 
errors 21001 through 
2 1701 occur 



LINKAGE EDITOR CONTROL STATEMENTS (. . . .Cont'd) 



Operation 



ACTION 
(Cont'd) 



BG: Sets the end-of-supervisor ad- 
Fl dress used In Linkage Editor 
F2 calculation to the beginning 
F3 of the partition specified,plus 
F4 the length of the label area 
and of the save area 
If none of these operands are 
present, the program is link- 
edited to execute in the vir- 
tual partition in which linkedit 
takes place, unless otherwise 
specified in the PHASE state- 
ment 

REL Indicates that the phase(s) 

produced during this exe- 
cution of the Linkage 
Editor is to be made relo- 
catable if possible. 
Refer to origin operand 
In PHASE statement 
Note: If support for the relocating 
loader was generated in the super- 
visor, ACTION REL Is the default 

NOREL Indicates that the phase(s) 
produced during this exe- 
cution of the Linkage 
Editor is not to be made 
relocatable 
Note: If support for the relocating 
loader was not generated in the 
supervisor, ACTION NOREL Is the 
default 



Maintenance Functions 



Function 


Unit 


Element 


Control Statements 


Catalog 


Core Image 


Phase 


// OPTION CATAL 

(Linkage Editor control statements and if 

in card form, the phase to be cataloged) 

/* 

// EXEC LNKEDT 


Relocatable 
Library 


Module 


// EXEC MAI NT 

CATALR modulename [,v,m ] 
(module to be cataloged) 


Source statem. 


Book 


// EXEC MAiNT 

CATALS sublib.bookname [,v.m],c] ] 
(book to be cataloged ) 


Procedure 
Library 


Proce- 
dure 


// EXEC MAINT 

CATALP procedurename [,VM=v.m] 

[,EOP=yy][,DATA=^] 

(procedure to be cataloged) 
/+ (or delimiter as specified in EOP 
parameter) 


Delete 


Core Image 
Library 


Phase 


// EXEC MAINT 

DELETC phase 1 [,phase 2 ] 


Program 


// EXEC MAINT 

DELETC progl .ALL[,prog2.ALL, . . . .] 


Relocatable 
Library 


Module 


// EXEC MAINT 

DELETR module l[,module2, ] 


Program 


// EXEC MAINT 

DELETR progl .ALL[,prog2. ALL, . . . .] 


Library 


// EXEC MAINT 
DELETR ALL 


Source 

Statement 

Library 


Book 


// EXEC MAINT 

DELETSsublib.bookl[,sublib.book2,..] 


Sub 
Library 


// EXEC MAINT 

DELETSsublib.ALL 


Library 


// EXEC MAINT 
DELETS ALL 


Procedure 


Proce- 
dure 


// EXEC MAINT 

DELETP procedurename[,procedure- 
name2, ] 


V^y 


// EXEC MAINT 
DELETP ALL 


Rename 


Core Image 
Library 


Phase 


// EXEC MAINT 

RENAMC oldname,newname[,oldname, 
newname, . . . .] 



LIBRARIAN (....Cont'd) 



Function 


Unit 


Element 


Control Statements 


Rename 
(Cont'd) 


Relocatable 
Library 


Module 


// EXEC MAINT 

RENAMR oldname,newname [,oldname, 
newname, ] 


Source 
Statement 


Book 


// EXEC MAINT 

RENAMS sublib.oldname,sublib. new- 
name [,sublib.oldname, sub lib. newname, 


Procedure 
Library 


Proce- 
dure 


// EXEC MAINT 

RENAMP oldname,newname[,oldname, 
newname, ] 


Update 


Source 
Statement 


Book 


// EXEC MAINT 

UPDATE sublib.bookname,[s.bookl ], 

[v.m],[nn] 
) ADD, ) DEL, or ) REP statements as 

required with source statements to be 

added 
)END Lv.m],C]] 


Condense 


Core Image 
Library 


Library 


// EXEC MAINT 
CONDS CL 


Relocatable 


Library 


//JOB jobname 

// EXEC MAINT 

CONDS RL 


Source 

Statement 

Library 


Library 


// EXEC MAINT 
CONDS SL 


Procedure 
Library 


Library 


// EXEC MAINT 
CONDS PL 


Libraries 


All 


// EXEC MAINT 

CONDS CL, RL, SL, PL 


Set 

Parameter 

for 

Automatic 

Condense 


Libraries 


Any or 
All 


// EXEC MAINT 

CONDL lib= nnnnn[,lib= nnnnn[,lib= 
nnnnn ] ] 

Notes: Values to be substituted for lib: 
CL - Core image library 
RL - Relocatable library 
SL - Source statement library 
PL - Procedure library 

Values to be substituted for nnnnn: 
One to five decimal digits with a 
maximum value of 65536. 


Reallocation 


System 


Library 


// DLBL IJSYSRS/DOS SYSTEM RESI- 
DENCE FILE'dafe,code 

// EXTENT SYSRES, balance of extent 
information 

// EXEC MAINT 

ALLOC CL=cylin(tracks) ,RL=cylin( 
tracks), SL=cyIin(tracks), PL=cylin(tracks) 



LIBRARIAN ( Cont'd) 



Function 


Unit 


Element 


Control Statements 


Reallocation 
(Cont'd) 


System 
(Cont'd) 


Library 
(Cont'd) 


Notes: 

CL- Core image library 
RL - Relocatable library 
SL - Source ststement library 
PL - Procedure library 

Values to be substituted for 
cylin and track: Any integer 



Note: //JOB, /* and /& must be included where needed 



Service Functions 



Display Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


// EXEC CSERV 

DSPLY phase U,phase2, . . . .] 


Program 


// EXEC CSERV 

DSPLY prog l,ALL[,prog2. ALL, . . . .] 


Library 


// EXEC CSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY CD or DSPLYS CD 


Phase(s) 

with 

Version 

Modifica- 
tion Level 


In the standard position: 
// EXEC DSERV 

DSPLYCS ] CD(phasename) or CD(phasename) 

In the nonstandard position or higher than DSERV in use: 


// EXEC DSERV 

DSPLYCS] CD(phasename,nn) or CD(phasename ,nn) 


Relocatable 
Library 


Module 


// EXEC RSERV 

DSPLY module! [,module2, . . . .] 


Program 


// EXEC RSERV 

DSPLY prog 1 .ALL[.prog2. ALL, . . . .] 


Library 


// EXEC RSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY RD or DSPLYS RD 


Source 

Statement 

Library 


Book 


// EXEC SSERV 

DSPLY sublib.bookl [.sublib.book2, . . . .] 


Sub library 


// EXEC SSERV 

DSPLY sublibl . ALL[,sublib2. ALL, . . . .] 


Library 


// EXEC SSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY SD or DSPLYS SD 



LIBRARIAN (....Cont'd) 



Display Unit 


Element 


Control Statements 


Procedure 
Library 


Procedure 


// EXEC PSERV 

DSPLY procedurenamel[,procedurename2, . . . .] 


Library 


// EXEC PSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY PD or DSPLYS PD 


Transient 
,Directory 


Directory 


// EXEC DSERV 

DSPLY TD or DSPLYS TD 


System 
Directory 


Directory 


// EXEC DSERV 


Directories 


All 


// EXEC DSERV 

DSPLY ALL or DSPLYS ALL 


Punch Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


// EXEC CSERV 

PUNCH phasel[,phase2 / ...] 


Program 


// EXEC CSERV 

PUNCH prog l.ALL[,prog2. ALL, . . . .] 


Library 


// EXEC CSERV 
PUNCH ALL 


Relocatable 


Module 


// EXEC RSERV 

PUNCH module l[,module2, ... .] 


Program 


// EXEC RSERV 

PUNCH prog l.ALL[.prog2. ALL, . . . .] 


Library 


// EXEC RSERV 
PUNCH ALL 


Source 

Statement 

Library 


Book 


// EXEC SSERV 

PUNCH sublib.bookl[,sublib.bool<2 / . . J[,CMPRSD] 


Sublibrary 


// EXEC SSERV 

PUNCH sublibl . ALL[,sublib2. ALL, . . . .][,CMPRSD] 


Library 


// EXEC SSERV 

PUNCH ALL[,CMPRSD] 


Procedure 
Library 


Procedure 


// EXEC PSERV 

PUNCH procedurenamel[,procedurename2, ] 


Library 


// EXEC PSERV 
PUNCH ALL 


Display and 
Punch Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


// EXEC CSERV 

DSPCH phasel [,phase2, ] 


Program 


// EXEC CSERV 

DSPCH prog 1. ALL[,prog2. ALL, . . . .] 



LIBRARIAN (....Cont'd) 



Display and 
Punch Unit 


Element 


Control Statements 


Core Image 

Library 

(Cont'd) 


Library 


// EXEC CSERV 
DSPCH ALL 


Relocatable 
Library 


Module 


// EXEC RSERV 

DSPCH module 1 [,module2, . . . .] 


Program 


// EXEC RSERV 

DSPCH progl . ALL[,prog2. ALL, . . . .] 


Library 


// EXEC RSERV 
DSPCH ALL 


Source 

Statement 

Library 


Book 


// EXEC SSERV 

DSPCH sublib.bookl [,sublib.book2, . . . .][,CMPRSD] 


Sublibrary 


// EXEC SSERV 

DSPCH sublibl . ALL[,sublib2. ALL, . . . .][,CMPRSD] 


Library 


// EXEC SSERV 

DSPCH ALL[,CMPRSD] 


Procedure 
Library 


Procedure 


// EXEC PSERV 

DSPCH procedurenamel[,procedurename2, ] 


Library 


// EXEC PSERV 
DSPCH ALL 



Note: //JOB, /* and /& must be included where needed 



Copy Functior 



Copy Unit 


Element 


Control Statements 


Core Image 


Phase 


//ASSGN SYS002,X , cuu' 

// DLBL IJSYSRS/DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cyl in(tracks) , PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC phase l[,phase2, ] 


Program 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cyi in (tracks) 

SL=cylin(tracks), PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC prog 1 . ALLl, prog2 .ALL, J 



Copy Unit 


Element 


Control Statements 


Core Image 

Library 

(Cont'd) 


Library 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cyl in (tracks) 

SL=cylin(f racks), PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC ALL 


Relocatable 


Module 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cylin(tracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR module l[,module2, . . . .] 


Program 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks),RL=cylin(rracks) 

SL=cyl in(tracks) , PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR progl. ALL[,prog2. ALL, . . . .] 


Library 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=*ylin(tracks),RL=cylin(fracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR ALL 


Statement 
Library 


Book 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(rracks), RL=cylin(tracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS sublib.bookl[,sublib.book2, . . . .] 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Source 
Statement 

(Cont'd) 


Sublibrary 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cylin(tracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYSsublibl.ALL[,sublib2.ALL,....] 


Library 


//ASSGN SYS002,X , cuu' 

// DLBL IJSYSRS, 'DOS SYTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cyl in(tracks) , PL=cyl in(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS ALL 


Procedure 
Library 


Procedure 


// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cylin(rracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP procedurenamel [,procedurename2, ] 


Library 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(rracks) 

SL=cylin(tracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP ALL 


Libraries 


All 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cylin(rracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPY ALL 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Definition 
of a 
Private 

(See note 2) 


Core Image 


//ASSGN SYS003,X'cuu' 

// DLBL IJSYSPC, 'user identification of private 

library', date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

NEWVOLCL=cylin(tracks) 


Relocatable 


//ASSGN SYSRLB,X'cuu' 

// DLBL IJSYSRL, 'user identification of private 

library 1 , date, code 
// EXTENT SYSRLB, balance of extent information 
// EXEC CORGZ 

NEWVOLRL=cylin(tracks) 


Source 
Statement 


//ASSGN SYSSLB,X'cuu' 

// DLBL IJSYSSL, 'user identification of private 

library',date,code 
// EXTENT SYSSLB, balance of extent information 
// EXEC CORGZ 

NEWVOLSL=cylin(tracks) 


Definition 
and 

Creation of 
a Private 
Library 
(See note 2) 


Core Image 


//ASSGN SYS003,X'cuu' 

// DLBL IJSYSPC, 'user identification of private 

library', date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

NEWVOLCL=cylin(tracks) 

COPYC operands 


Relocatable 


//ASSGN SYSRLB, X'cuu" 

// DLBL IJSYSRL, 'user identification of private 

library', date, code 
// EXTENT SYSRLB, balcnce of extent information 
// EXEC CORGZ 

NEWVOLRL=cylin(tracks) 

COPYR operands 


Source 
Statement 


//ASSGN SYSSLB, X'cuu' 

// DLBL IJSYSSL, 'user identification of private 

library', date,code 
// EXTENT SYSSLB,balance of extent information 
// EXEC CORGZ 

NEWVOLSL=cylin(tracks) 

COPYS operands 


Merge System 
Residence to 
New System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS, 'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE RES,NRS 

COPY statements (COPYC, COPYR, COPYS, 

COPYP,COPYI) as required 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Merge New 
System 
Residence 
to System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS, 'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE NRS,RES 

COPY statements (COPYI,COPYC,COPYR, 

COPYS,COPYP,COPY) as required 


Merge System 
Residence 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRL, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSSL/PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSCL, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB,balance of extent information 
ASSGN SYSCLB,X'cuu' 
// EXEC CORGZ 

MERGE RES, PRV 

COPY statements (COPYI,COPYR,COPYS,COPYC) 

as required 


Merge New 
System 
Residence 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRS, 'NEW SYSTEM RESIDENCE', date, 

code 
// EXTENT SYS002, balance of extent information 
// DLBL IJSYSRL, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSSL, 'PRIVATE SOURCE STATEMENT 

LIBRARY 1 , date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSCL, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB, X'cuu' 
// EXEC CORGZ 

MERGE NRS, PRV 

COPY statements (COPYR,COPYS,COPYC) as 

required 


Private 
Libraries 
to System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSPR, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYS001, balance of extent information 
//DLBL IJSYSPS, 'PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYS00O,balance of extent information 
// DLBL IJSYSPC, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYS003,balance of extent information 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Merge 

Private 

Libraries 

to System 

Residence 

(Cont'd) 




// EXEC CORGZ 
MERGE PRV,RES 

COPY statements (COPYR,COPYS,COPYC) as 
required 


Merge 

Private 

Libraries 

to New 

System 

Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS, 'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// DLBL IJSYSPR, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSPS, 'PRIVATE SOURCE STATEMENT 

LIBRARY',date,code 
// EXTENT SYSOOO, balance of extent information 
// DLBL IJSVSPC, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

MERGE PRV,NRS 

COPY statements (COPYR,COPYS,COPYC) as 

required 


Merge 
Private 
Libraries 
to Private 
Libraries 




// ASSGN (statements as required) 

//DLBL IJSYSRL, 'NEW PRIVATE RELOCATABLE 

LIBRARY', date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSPR, 'EXISTING PRIVATE RELOCATABLE 

LIBRARY', date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSSL, 'NEW PRIVATE SOURCE STATEMENT 

LIBRARY, date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSPS, 'EXISTING PRIVATE SOURCE 

STATEMENT LIBRARY', date, code 
// EXTENT SYS00O,balance of extent information 
// DLBL IJSYSCL, 'NEW PRIVATE CORE IMAGE 

LIBRARY", date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB, X'cuu' 
// DLBL IJSYSPC, 'EXISTING PRIVATE CORE IMAGE 

LIBRARY', date code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

MERGE PRV,PRV 

COPY statements (COPYR,COPYS,COPYC) as 

required 

To define the private library in the same [obstep, precede 


MERGE with NEWVOL statement. 



Notes: l)//JOB, /* and /& must be included where needed 

2) The private library can be updated with either a MAINT or a copy MERGE 
function 



LIBRARIAN (....Cont'd) 



Direction of Transfer for Merge Operations 



File Name 


IJSYSRS 


IJSYSRS 


IJSYSRL 


IJSYSPR 


IJSYSSI 


IJSYSPS 


IJSYSCL 


IJSYSPC 


Logical Unit 


SYSRES 


SYS002 


SYSRLB 


SYS001 


SYSSLB 


SYS000 


SYSCLB 


SYS003 


Merge RES to NRS 


from 


to 














Merge NRS to RES 


to 


from 














Merge RES to PRV 


from 




to 




to 




to 




Merge NRS to PRV 




from 


to 




to 




to 




Merge PRV to RES 


to 






from 




from 




from 


Merge PRV to NRS 




to 




from 




from 




from 


Merge PRV to PRV 






to 


from 


to 


from 


to 


from 



Function: De-editing and/or updating of edited macro's. 

(Refer to: Guide to DOS/VS Assembler (GC33-4024)) 



Control Statement 


Meaning 


// EXEC ESERV 




GENEND 


Causes generation of an assembler END 
statement, and a/* statement. GENEND, 
when present, must be the first statement 
after the// EXEC ESERV statement. 


GENCATALS 


Causes generation of the appropriate 
CATALS statement before each macro in 
the stream, and a /* statement after the 
last macro. GENCATALS ,when present, 
must be the first statement after the 
// EXEC ESERV statement. 
Note: If neither GENEND nor GENCA- 
TATS~is used, GENCATALS is assumed. 


DSPLYsublibl.macl,sublibl.mac2, 


Produces a printout of the de-edited macro 
on the device assigned to SYSLST. 


PUNCH sublibl.macl ,sublibl.mac2, .... 


Produces a de-edited deck on the device 
assigned to SYSPCH. 


DSPCHsublibl.macI,sublibl.mac2, 


Produces a deck and printout of the de- 
edited macro on the devices assigned to 
SYSPCH and SYSLST respectively. 


) COL start col,n 


Specifies the columns containing the se- 
quence numbers in the statement of a macro 
definition. 

startcol: A decimal number within 
the range 73-80, which 
identifies the start column 
of the sequence number, 
n: A decimal number within 
the range 1-8, specifying 
the number of columns used 
by the sequence number. 
COL, when present must be the first state- 
ment following DSPLY, PUNCH or DSPCH 
statement. If the COL statement is omitted 
startcol receives a default value of 73 and 
n a default value of 6. 


) VER seqno+rel,l 


Specifies the source statement of a macro 
definition which contents are to be verified. 

seqno+rel: Identifies the source state- 
ment which is to be compa- 
red with the statement fol- 
lowing the VER statement, 
segno: The sequence number 
of a source statement. 



ESERV (....Cont'd) 



Control Statement 


Meaning 


) VER seqno+rel,! 
(Cont'd) 


rel: A decimal number of 
1-4 digits in length. If 
omitted, is assumed. 
1: A decimal number within 

the range 1-80. If omitted, 
72 is assumed. 
Only the first 1 characters 
are used in the comparison. 


) ADD seqno+rel 


Add statements to a source macro definition. 

seqno+rel: Identifies the source state- 
ment after which the new 
statements following the 
ADD statement are to be in- 

(seqno: See VER statement) 
(rel : See VER statement) 


) DEL seqno+rel, seqno+rel 


Delete statements from a macro source defi- 
nition. 

seqno+rel, seqno+rel: Identifies the first and 
the last source statement of 
the section to be deleted. 
If the second operand is 
omitted, only the source 
statement identified by the 
first operand is deleted, 
(seqno: See VER statement) 
(rel : See VER statement) 


) REP seqno+rel,seqno+rel 


Replace statements in a source macro defini- 
tion. 

seqno+rel, seqno+rel: Identifies the first and 
the last source statement of 
the section which is to be 
replaced by the statements 
following the REP statement. 
If the second operand is omitt 
omitted, only the source sta- 
tement identified by the first 
operand is replaced, 
(seqno: See VER statement) 
(rel : See VER statement) 


) RST seqno+rel 


Specifies a new sequence number serial starts. 

seqno+rel: Identifies the source state- 
ment after which the new 
serial starts. 

(seqno: See VER statement) 
(rel : See VER statement) 


) END 


Indicates the end of an update to a macro defi- 
nition. Required statement for all updating. 



Sample coding for de-editing without updating a macro definition 



// JOB NOUPDATE 
// EXEC ESERV 

PUNCH E.MAC1,E.MAC2 
/* 
/& 



Sample coding for de-editing and updating a macro definition 



//JOB UPDATE 
// EXEC ESERV 

GENEND 

DSPCH E.MAC1 
) COL 77,4 
) VER 72 + 1,5 
.PP9 
) ADD 72 + 1 

AIF (&PCH NE 1400)D4 
) DEL 102,103 
) REP 245 

JOYCE CLC 0(4,REG6),BLANKS 
) END 

/* 

// PAUSE CHECK LIST,MOVE DECK TO READER 

// OPTION EDECK,NODECK 

// EXEC ASSEMBLY 

deck produced by ESERV 

// PAUSE MOVE SYSPCH DECK TO READER 
// EXEC MAINT 



deck produced by assembler 



/* 
/& 



SUPERVISOR MACROS 



Supervisor Macro Instruction 



Operation 



Operand 



Explanatior 



■w 



Specify if there is to be multiprogramming 
within a partition (multitasking) support. 
AITM=YES is assumed if AP=YES. If 
the operand (NO or YES) is incorrectly 
entered, YES is assumed. If AP=YES is 
specified and NPARTS is omitted or spe- 
cifies 1, NPARTS=3 is forced. 



-M 



Specify YES if supervisor support of ASCII 
code is desired. 



M 



(Models 115 and 125 
only) 



Specify if channel attached devices, tape 
units or tp devices are to be added to a 
Model 115 or 125 CPU during system 
generation or at IPL time. CHAN=YES 
causes RMSR support to be generated. 
CHAN=NO is ignored if RMS=YES. 



M 



Specify RDE to include Reliability Data 
Extractor recording in addition to normal 
RMSR recording (YES). 
For the Model 115 or 125, CHAN=YES 
or RMS=YES must be specified if RDE Is 
to be used. 



-M 



YES must be specified if mixed parity tape 
processing is required for the emulators, 
the tape preprocessor and the tape post- 
processor programs. 



(models 115 and 125 only) 



Specify if the supervisor is to provide MCAR/ 
CCH support for a Model 1 15 or 125 CPU. 
RMS=YES overrides MCH=NO. 



(j419Dj 



Indicates whether the supervisor is to sup- 
port magnetic ink character readers or 
optical reader/sorter. If 1419's or 1255/ 
1 270/1 275 's are attached to a multiplexer 
channel, the PIOCS parameter BMPX=YES 
is supported; however, burst mode and MICR 
devices cannot run concurrently on the same 
byte multiplexer channel. (3886 OCR's do 
not require MICR support). 



{§ 



Specifies the number of partitions to be sup- 
ported. The maximum value for n is 5. The 
default value is 1 if the AP parameter is 
omitted, or if AP=NO. The default value is 
3 if AP=YES. If POWER=YES is specified, 
NPARTS=2, 3, 4, or 5 must be specified 
unless AP=YES is specified. 



SUPERVISOR MACROS (. . .Cont'd) 



Supervisor Macro Instruction ( Cont'd) 



Operation 


Operand 


Explanation 




».fl 


Specify this parameter if you plan to use the 


(Cont'd) 


w 


Supervisor Select option. You can assign a 


I J 


unique name to the supervisor being 






generated by specifying any alphameric 






character (A-Z, 1-9) in this field. 


PAGE.N= fc°-l 


Specify that paging activity is to be 




controlled by the PAGE IN, RELPAG, 




I J 


and FCEPGOUT macros. The value n 






indicates the maximum of page-in requests 






that can be queued at any one time for 






execution. 


"*-&§( 


Specify if page fault handling overlap is 




desired for private multitasking. YES is 




I J 


required if SETPFA macro instructions are 






used. When PHO=YES, PFIX=YES is 






assumed. 


po^^H 


Specify YES for support of POWER/VS. If 




NPARTS=1 or omitted, POWER=YES causes 




I J 


NPARTS=3 to be generated. 


•MS-flg} 


Specify YES for RMS support (MCAR/CCH 




and RMSR) for a Model 1 15 or 125 CPU. 




(models 115 and 125 


RMS=YES overrides specification of CHAN 




only) 


and/or MCH. 




[NO 


Specify if teleprocessing support is desired. 






VTAM 


QTAM includes BTAM support. If AP=YES, 




TP= \ 


BTAM [VTAM] > 


n specifies the maximum number of active 






QTAM CVTAAv?) 


QTAM message processing programs in the 






QTAMn rVTAMl 


system. From 2 to 12 may be specified. The 






default value for n is 2. If AP=NO, n is 
always 2. If QTAM is specified, then 
NPARTS=2, 3, 4, or 5 must be specified 
unless AP=YES is specified. If BTAM runs 
virtual, PFIX=YES is required. If VTAM is 
specified, AP=YES must be specified. 
Support is included for TP Balancing, unless 
TP=NO is specified or TP=BTAM and 
NPARTS=1 . 



Describe the Hardware Features 



Operation 


Operand 


Explanation 


CONFG 


-M 


Floating Point Feature 



SUPERVISOR MACROS (...Cont'd) 



Describe the Hardware Features (. . .Cont'd) 



Operation 


Operand 


Explanation 


CONFG 
(Cont'd) 


MODEL= ■ 


'115 I 
125 

135 1 
145 f 
155-11 

.158 J 


Specify the CPU model number. Model=135, 
145, 155-11 or 158 forces MCAR/CCH and 
RMSR to be generated. When Model=125 is 
specified, support for DOC and 3330 is always 
generated. When Model=115 is specified, 
support for DOC and 3340 is always generated. 



Specify Standard settings for Job Control 



Operatic 



Operand 



"■<*-{&} 



■ffl 



CHARSET= {g§] 



DATE= (dMy} 



= M 



[YES 
DUMP=<RO 

IpartI 



m 



{to} 



LINES= 



*_ 



H$ 



""*■{$ 



Specify if the assembler is to align data o 
halfword or fullword boundaries. 



Specify if Job Control is to cancel jobs 
(ACANCEL=YES) or await operator 
intervention (ACANCEL=NO) after an ur 
successful attempt to assign a device. 



Specify the 48- or 60 character set for 
PL/1 translator input on SYSIPT. 



Format of the date. 



Output of object modules of language 
translators on SYSPCH. 



Dump of registers and virtual storage on 
SYSLST. PART dump of supervisor control 
blocks and virtual storage of the partition 
on SYSLST. 



Specify if the assembler is to create and 
punch edited macros on SYSPCH. 



COBOL, PL/1, FORTRAN and basic 
FORTRAN summarize all errors in sour 
programs on SYSLST. 



Number of lines per page on SYSLST (nr 
must be between 30 and 99). 



Source module listings and diagnostics 
from language translators on SYSLST. 



Hexadecimal object module listings from 
PL/1 and COBOL on SYSLST. 



SUPERVISOR MACROS (. . .Cont'd) 



Specify Standard settings for Job Control ( — Cont'd) 



Operation 


Operand 


Explanation 


STDJC 
(Cont'd) 


^ {4 


Listing of all control statements on SYSLST. 


"™- M 


Support of assembler system variable 
symbol &SYSPARM 


™*{s§} 


PL/1 outputs symbol tables on SYSPCH. 
The American National Standard COBOL 
compiler produces a data division glossary. 


— {£-} 


Assembler and American National Standard 
COBOL compiler output symbolic cross- 
reference lists on SYSLST. 



Specify Optional Support in the Supervisor 



Operatic 



Operand 



Explanatio 



■M 



Specify if the abnormal termination exit 
function is to be supported. The abnormal 
termination exit allows the user to exit to a 
user's routine before an abnormal end of job 
causes a program to be cancelled. Specify 
YES for American National Standard 
COBOL I/O error recovery. AB=YES is 
forced by VSAM=YES or TP=VTAM. 



;*} 



Specify if I/O requests are to be appraised 
for console buffering and indicate the 
number of buffers (3-25) to be generated. 



r 


NO 




2314 


(n,n 


, S333&) ) 




334CN 




[232 1J 


L 


J 



Specifies support for protection of DASD files. 
n,n indicates the range of channels to which 
the devices may be attached. Specifying 
2311, 2314, 3330, or 3340 generates support 
for 2311s, 2314s, 2319s, 3330s, and 3340s. 
Specifying 2321 generates support for all 
DASD devices. 



JnoI 

|T25W 



Specify if support for the Display Operator 
Console (DOC) is to be generated. The 
default is NO if MODEL=135, 145, 155-11, 
or 158. For MODEL=115 or 125, DOC=125D 
is forced. 



■M 



Specification of this parameter allows use of 
the VIRTAD macro, and of the REALAD macro 
and of the EXCP macro with the REAL 
parameter. 



1 



Specify the number of entries for the error 
queue. Without multiprogramming n may 
be from 3 to 25. With multiprogramming 
support n may be from 5 to 25. The lower 
value is the default value in each case. 



SUPERVISOR MACROS (...Cont'd) 

Specify Optional Support in the Supervisor (. . .Cont'd) 



Operation 


Operand 


Explanation 


FOPT 
(Cont'd) 


EVA=fel 


Specify if error volume analysis is supported, 
r is the read error parameter; w is the write 
error parameter. 


FASH* {^} 


Specify if fast CCW translation is to be 
supported. Fast translation is attempted 
for all channel programs except : 

1 . Those containing non-contiguous CCW 
strings. 

2. Those associated with translation requests 
from BTAM. 


<*»*■ {Sg} 


Specify storage management support, using 
GETVIS and FREEVIS macro instructions. 
YES is assumed if VSAM=YES or TP^TAM. 
GETVIS=YES forces RELLDR=YES. 


IDRA= 


No! 
YE5J 


Specify the independent directory read-in 
area (IDRA). If IDRA=YES, NPARTS must 
be>l. 


4-} 


STXIT option is available for interval timer 
interruption. IT=YES generates timer support 
for all tasks in all partitions. YES is forced 
by TT=VTAM. — 


fNO ] 

ja=^ wr } 

((nl,n2,n3,n4,n5)J 


Specify if Job control job accounting 
interface is to be supported. 


""<»- {&} 


Specify for support of user-written job control 
job accounting interface routines containing 
LIOCS, and LIOCS with label processing 


<*■£§} 


STXIT option is available for external inter- 
ruptions (except timer) to problem programs. 
YES is required if emulator program operator 
services are to be requested through the 
INTERRUPT key. OC=YES is forced if 
RETAIN=YES, OLTEP=YES or TP=VTAM. 


°— {^} 


Specify if the on-line testing function is 
desired. If OLTEP=YES then OC=YES and 
RELLDR=YES are forced. OLTEP=YES is 
forced if RETAIN=YES. 


-{^} 


STXIT option is available for program check 
interruption. Included in supplied supervisor 
because QTAM, FORTRAN, COBOL-D, Pl/1 
and RPG require PC= YES. 


PCIL= ■ 


NO) 
YESf 


Specify if private core image libraries are to 
be supported. PCIL=NO forces PSLD=NO. 



SUPERVISOR MACROS (...Cont'd) 

Specify Optional Support in the Supervisor (. . .Cont'd) 



Operation 



Operand 



Explanation 



FOPT 
(cont'd) 



■B 



4s) 



PRTY= (partition n 
sequence) 



H 



M 



fNO' 
SKSEP={YbS 



Specify the number of bytes to be allocated 
to the problem determination programs. Any 
amount between 1400 and 10240 may be spe- 
cified for n. Specification of YES provides 
the minimum number of 1400 bytes. 



Specify if the supervisor is to support the 
fixing and freeing of pages in real partitior 
PFIX=YES is forced by PHO=YES, 
POWER=YES, or TP=VTAM. 



Specify the desired dispatching priority for 
each partition (from low to high). 



Specify the number of entries in the Private 
Second Level Directories. A directory is 
created for each partition. The minimum vali* 
for n is 5. PCIL=NO forces PSLD=NO. 



Specify relocating load support in the super- 
visor. RELLDR=YES is forced by VSAM=YES, 
GETVIS=YES, OLTEP=YES, RPS=YES, 
RETAIN =YES, and TP=VTAM. 



Specify YES if the data link to the Remote 
Analysis Center is to be supported. 
If RETAIN=YES is specified, OC=YES, 
OLTEP=YES, and RELLDR=YES are forced. 



Specify if seeks are to be separated from the 
remainder of channel programs. Seek separa- 
tion allows other devices on the channel to be 
accessed (including other seeks) during the 

YES indicates support for all DASD type de- 
vices specified by the DVCGEN macro, n is 
the number of DASD devices to be supported 
and can not be less than the number of 
DASD devices specified at system generation. 
The maximum number is 254. 



Specify the number of entries in the Second 
Level Directory. The minimum value for n is 5. 



SUPERVISOR MACROS (...Cont'd) 

Specify Optionol Support in the Supervisor (.. .Cont'd) 



Operand 



Explanation 



FOPT 
(cont'd) 



NO 
SYSFIL={ YET" 
.(YES, 



- ) 

,nl,n2)J 



¥) 






H 



■S 



/no] 



Specify if system input and system output files 
(SYSRDR, SYSIPT, SYSLST, SYSPCH) may be 
assigned to a disk device or an 3540 Diskette 
or, if extended support for the procedure 
library is desired. In a disk only configuration 
SYSFIL=YES is required for system maintenance. 



esidual capacity for beginning of opera- 
tor notification where SYSLST assigned 

a disk device. 100<nl£65535. If nl 

omitted, 1000 is assumed. 

•esidual capacity for beginning of opera- 
tor notification where SYSPCH assigned 
5 a disk device. 100^2^55535. If n2 
omitted, 1000 is assumed. 

: If neither nl or n2 is specified, the 
operand need not be placed between 
parentheses. 



Specify if tape error statistics are to be accu- 
mulated and logged for the 2495 Tape Cartrid- 
ge Reader, where n is the number of tape 
cartridge readers attached to the system. 
Allow extra TEB's for future expansion of the 
system. 



Specify the type of error recording (combined 
or individual) to be performed for unlabeled 
or non-standard tapes. 



Specify time of day clock support. 
TP=VTAM forces TOD=YES. 



Specify of the track hold function is to be 
supported. The maximum number of tracks 
that can be held at one time is 225. The 
default is 10 if n is an invalid operand (non- 
numeric or outside the range 1-255). 
If TRKHLD=n is specified, NPARTS must be>l . 



Specify if supervisor support of the Virtual 
Storage Access Method (VSAM) is desired. 
If VSAM=YES, YES is assumed for GETVIS, 
AB and RELLDR. 



Specify if multiple wait function is to be 
supported. WAITM=YES is assumed if AP=YES 
or TP=VTAM. 



SUPERVISOR MACROS (.. .Cont'd) 



Specify Optional Support in the Supervisor (. . .Cont'd) 



Operation 


Operand 


Explanation 


FOPT 
(Cont'd) 


[NO] 
XECB= I YET> 


Specify YES or n if support for Cross Partition 
Event Control is desired, n must be specified 
as a numeric value and indicates the number 
of XECB's (Cross Partition Event Control Blocks) 
for which an entry is to be generated in a 
supervisor internal table. 


fNO -I 

ZONE= { "EAST , . J 

[ WEST ' hh ' mn J 


Specify the difference between Greenwich 
Mean Time and local time in hours (hh) and 
minutes (mm). Use EAST for areas east of 
Greenwich and WEST for areas west of 
Greenwich. If TOD=NO is specified, 
ZONE=NO is assumed. If the first operand is 
incorrectly specified, EAST is assumed. 


«-{*§} 


Provides support for the Rotational Position 
Sensing (RPS) capabilities of DASD devices 
supporting the feature. RPS=YES forces 
BLKMPS=YES in the PIOCS macro instruction 
and GETVIS=YES and RELLDR=YES in the 
FOPT macro. 



Define options and Configuration requirements to be included in Physical IOCS 



Operation 


Operand 


Explanation 


PIOCS 


BLKMPxJ^j 


Specify if block multiplexer mode is to be 
supported for integrated block multiplex 
channels. Must be NO for disk emulation. 


bmpx={n°] 


Burst mode device support on multiplexer 
channel. If 1419 's or 1255/1 270/1 275 's are 
attached to the multiplexer channel, BMPX= 
YES is supported. However, burst mode and 
MICR~3evices cannot run concurrently on the 
same byte multiplexer channel. 


fNO I 

CHANSW= < RWTAU } 

[ TSWTCHJ 


Specify if channel switching. For a 2404 or 
2804, enter CHANSW=RWTAU. Enter 
CHANSW=TSWTCH for a 2816 (with a 2403 
or 2803) or a 3803. 



SUPERVISOR MACROS (....Cont'd) 



Operation 


Operand 


Explanation 


PIOCS 
(Cont'd) 


f 2311 ] 

2314 
DISK=< 3330 I 
3340 
[ (3330, 3340) J 


Specifies the type of disk devices to be sup- 
ported. If this parameter is omitted, or if 
2311 or 2314 is specified, support is genera- 
ted for 2311, 2314, and 2319 devices. 
Specifying 3330 or 3340 also generates support 
for 2311 and 2314. For Model 125, 3330 is 
forced if neither 3330 nor 3340 is specified. 
For Model 115, 3340 is forced. 


mrslchJ^J 


Specify if MICR device is on the selector 
channel (can only be specified for the 
1419 single address device). 


TAPE=| 9 1 

[noJ 


Specify PIOCS tape support. Support is gene- 
rated for both 7- and 9 track tape unless NO 
is specified. 



Specify Size of Real and Virtual Address Areas 



Operatic 



Operand 



Specify the size of the real address area, 
n must be>64 and a multiple of 2. 



Specify the size of the virtual address area, 
n must be^64 and a multiple of 2. The maxi- 
mum value that can be substituted for n is 
16K (16384) minus the value substituted for n 
in the RSIZE parameter. 



Specify the number of copy blocks to be used 
by the Channel Program Translation routine. 
The following table shows the minimi. m value 
that can be specified and default value that 
is used if the operand is omitted. 



FASTTR= 


NPARTS= 


BUFSIZE= 
Default Minimum 


NO 


1 


10 


10 


NO 


2-5 


30 


30 


YES 


1 


30 


30 


YES 


n(-2-5) 


30+(nx20) 


30 



(64K,0K) 
(nK, mK) 



nK specifies the size of the Shared Virtual 
Area (SVA); mK specifies the size of the system 
GETVIS area in the SVA. n must be at least 64 
and a multiple of 2. m must be smaller than 
and also a multiple of 2. 



SUPERVISOR MACROS (. . . .Cont'd) 



Specify partitioning of Virtual Address Area 



Operation 


Operand 


Explanation 


ALLOC 


Fl=nK,F2=nK,F3=nK 
F4=nK 


Operands may be specified in random order, 
n must be a multiple of 2 and should not be 
less than 64, unless is specified. 



Specify partitioning of Real Address Area (less Supervisor and Main Page Pool) 



Operation 


Operand 


Explanation 


ALLOCR 


BGR= nK[F4R= nKTF3R= n 
F2R=nK£FlR=nK]]J] 


3, 

Operands may be specified in random order, 
n must be a multiple of 2. Minimum amount 
of real storage to be reserved for the main 
page pool is : 18K bytes (+2K if AP=YES) 
if PFIX=YES, or 18K bytes (+2K if AP=YES) 
minus the size of the smallest real partition 
ifPFIX=NO. 



Define the necessary Input/Output Tables for the Syster 



Operation 


Operand 


Explanation 


IOTAB 


BGPGR= j^j 


Specify the number of logical unit blocks (LUB 
for programmer units i.e. , the number of sym- 
bolic programmer logical units (SYS000- 
SYSnnn). 


F1PGR= ||l 


Specify the number of symbolic units of the 
class SYSnnn forFl 


F2PGR= jjH 


Specify the number of symbolic units of the 
class SYSnnn for F2 


F3PGR= jM 


Specify the number of symbolic units of the 
class SYSnnn for F3 


F4PGR= jjjl 


Specify the number of symbolic units of the 
class SYSnnn for F4 


Hi} 


Number of JIB's for the system. Minimum 
value generated is 5. 


NRES=M 


Specifies the number of named resources in the 
system, n can have any value between 2 and 
255. ~ 



SUPERVISOR MACROS (....Cont'd) 



Operand 



Explanation 



IOTAB 
(Cont 'd) 



CHANQ=< - 



^ 



D2311=n 
D2314= n 
D2321=n 
D2400= n 
D3330= n 
D3340=n 
D3410=n 
D3420= n 
D3540= n 
D3886= n 



(Model 115/125 
only) 



BSCLNS=U| 
(Model 115/125) 



Number of entries in the channel queue 
Minimum value is 6 if NPARTS= 1 , 2 or 3; 8 
NPARTS=4; 10 if NPARTS=5. 



Specify the number of I/O device attached to 
the system. The minimum value is 5. 



Specify, for each I/O device listed at the 
left, the number of drives that are attached 
to our system. If the device is not specified, 
the system assumes that no devices of that 
type are attached. However, defaults other 
than zero are taken depending on the CPU 
Model specified and (for tape devices) 
whether PIOCS tape support is generated 
or not (see table below): 



Default 



D2314=2 
D2400=4 
D3330=2 
D3340=2 
D3410=2 



PIOCS 
Macro: 



CONFG Macro 
MODEL= 



135,145 
155-11, 



* Either one applies 



Specify the number of Start/ Stop lines for the 
Model 115 or 125 CPU. n may be any value 
between and 8 for Model 1 15 and and 16 
for Model 125. 



Specify the number of BSC lines for the Model 
1 15 or 125 CPU. n may be any value between 
and 4 for Model 1 15 and and 6 for Model 
125. 



Specify the Physical I/O units attached to the System 



Operation 


Operand 


Explanation 


DVCGEN 
(Note 1) 


CHUN= X'cuu' 


Hexadecimal number of channel and unit. 



SUPERVISOR MACROS (. . ■ .Cont'd) 



Operation 


Operand 


Explanation 


DVCGEN 
(Note 1) 


DVCTYP= xxxxxx 


Specify the device type. 






(Cont'd) 


CHANSW= 1^1 


YES indicates that the device is attached to 




more than one selector channel (the device 




l J 


is switchable) 


fx'ss' -I 


1) 2400T9; MODE is used to specify the tape 




MODE= <X'ssss' > 


mode. X'CG" is the default value. 




Ix'ssssss'J 


2) 3410T9 or 3420T9; MODE specifies the 
tape mode. X'CO' is the default value. 

3) 3420T9; MODE specifies the tape mode. 
X'CO' is the default value. 

4) 2400T7 or 3420T7; MODE is used to spe- 
cify the tape mode. X'90' is the default. 

5) 2702; MODE designates the SADxx com- 
mand. X'00' is the default value. 
X'00' SADO, X'01' SAD1, X'02' SAD2, 
X'03' SAD3. 

6) 2260 (local) and 3270 (local) 
MODE is used to specify the 1053, 
3284 or 3286 printer when CHUN= 
X'cuu' refers to a 1053 attached to a 
2848 or to either 3284 or a 3286 
attached to a 3272. This operand must 
be entered as X'01'. 

7) 1419, 1255, 1259, 1270, 1275 MODE 
designates the external interrupt bit 
associated with magnetic ink charac- 
ter reader. 

X'01' External line 7 
X'02' External line 6 
X'04' External line 5 
X'08' External line 4 
X'10' External line 3 
X'20' External line 2 

8) 1018 MODE specifies whether the 
Error Correction feature is present or 
not. X'00' is the default value. The 
operand must be entered as X'01' if 
the feature is present. 

9) 2703 For a Model 115 and 125 with 

ICA, MODE=X'ss', MODE=X'ssss", 
or MODE=X'ssssss' specifies the line 
mode setting for a start/stop or BSC 
line. 

10) 3705 MODE specifies the type of channel 
adapter. No default is assumed X'01' 
Type 1 channel adapter. X'02' Type 2 
channel adapter. . 



SUPERVISOR MACROS (... .Cont'd) 



Assign LUB's to PUB's as Standard System Assignments 



Oparation 


Operand 


Explanation 


ASSGN 
(Note 2) 


SYSnr 


n.XW 


",BG 
,TT 
,F2 
,F3 
,F4 


Es] 


Symbolic unit is assigned a hexadecimal 
channel and unit number within a parti- 
tion, and an input hopper for an IBM 
2560 or 5425 



Define the Page Data Set 



Operation 


Operand 


Explanation 


DPD 


UNIT=X'cuu' 


Specify channel and unit number of the 
disk device that is to contain the page 
data set. 


CYL = nnn 


Specify the number of the cylinder where 
the page data set is to begin. 


VOLID= xxxxxx 


Specify the volume serial number of the 
disk pack that holds the page data set. 








SEND 


(n) 


End of supervisor macro instructions. 
n= beginning address of the problem 
program area. 



Note 1: Rules for using DVCGEN 

1 A separate DVCGEN macro instruction is required for each device. 

2 The total number of DVCGEN macros must not exceed the total number 
of devices specified in the IODEV parameter of the IOTAB macro. 

3 DVCGEN macros must be specified in ascending channel address 
sequence. 

A Switchable units (attached to more than one selector channel) must be 
defined once. They are defined on the lowest channel on which they 
are addressable. 

5 The sequence of the DVCGEN cards determines the priority of the 
devices on their channel. Switchable units must be the last device 
for each channel, and must be on consecutive channels. 



6 The specifications of these macros may be altered by IPL and DEL 
statements. 



SUPERVISOR MACROS (. . . .Cont'd) 



Note 2: Rules for using ASSGN 

1 The ASSGN macro allows SYSRDR, SYSLST, SYSPCH and SYSIPT to be 
assigned to a tape or DASD. However, IPL unassigns any such assignments. 

2 SYSLOG must also be assigned in BG, if assigned in foreground partition. 

3 SYSLNK can only be assigned to a foreground partition if PCIL has been 
specified and NPARTS> I. 



DEVICE TYPE CODES 



Card 
Code 


Actual IBM Device 


Device- 
Type X'nn" 


Device Type 


2400T9 


9-track Magnetic Tape 
Tape units 


50 




2400T7 


7-track Magnetic 
Tape units 


50 




3410T9 


9-track 3410 Magnetic 


53 






Tape units 




Magnetic Tape devices 


3410T7 


7-track 3410 Magnetic 
Tape units 


53 




3420T9 


9-track 3420 Magnetic 
Tape units 


52 




3420T7 


7-track 3420 Magnetic 
Tape units 


52 




1442N1 


1442N 1 Card Read Punch 


30 




2520B1 


2520B 1 Card Read Punch 


31 




2560 


2560 Multifunction Card 


33 






machine 




Card Read Punches 


2596 


2596 Card Read Punch 


30 




3525RP 


3525 Card Punch (with 
optional read feature) 


32 




5425 


5425 Multifunction card 
Unit 


34 




2501 


2501 Card Reader 


10 




2540R 
3504 


2540 Card Reader 
3504 Card Reader 


11 
12 


Card Readers 


3505 


3505 Card Reader 


12 




2540 P 


2540 Card Punch 


21 




2520B2 


2520B2 Card Punch 


20 




1442N2 


1442N2 Card Punch 


22 


Card Punches 


2520B3 


2520B3 Card Punch 


20 




3525P 


3525 Card Punch 


23 




1403 


1403 Printer 


40 




1403U 


1403 Printer with UCS 
feature 


42 




1443 


1443 Printer 


41 




2260(local) 


1053 Printer with 2848 
Control Unit. MODE 
operand must be entered 
as X'OT 


CO 




3203 


3203 Printer 


4A 




3211 


3211 Printer 


43 


Printers 


3277 


3284 or 3286 Printer with 


B0 




(local 3270) 


3272 Control Unit. MODE 
operand must be entered 
as X'OT 






3277B 


3284 or 3286 Printer with 


B0 




(local 3270) 


3272 Control Unit, attach- 
ed in burst mode to a mul- 
tiplexer channel. MODE 
operand must be entered 
as X'OT 






5203 


5203 Printer 


4C 




5203U 


5203 Printer with UCS 
feature 


4D 





DEVICE TYPE CODES (.... Cont'd) 



Card 
Code 


Actual IBM device 


Device 
Type X'nn' 


Device Type 


1050A 


3210,3215 Console 
Printer Keyboards 


00 


Printer Keyboards 


125D 


Model 115/125 Integrated 
Display Operator Console 


B2 




125DP 


Model 115/125 Integrated 
Display Operator Console 
with 5213 Console Printer 
attached 


B2 


Display Operator Consoles 


UNSP 


Unsupported device 


FF 


Unsupported no burst mode 
on multiplexor channel 


UNSPB 


Unsupported device 


FF 


Unsupported with burst 
mode on multiplexor channel 


2311 


2311 Disk Storage Device 


60 




2314 


2314 Direct Access Storage 
Facility 


62 




2314 


2319 Disk Storage Facility 


62 




2321 


2321 Data Cell Drive 


61 




3330 


3330-1,3330-2 or 3333-1 


63 






Disk Storage 






3330 


3350 Direct Access Storage in 
3330 Compatibility mode 


63 




3340 


3340 Disk Storage (General) 


68 




3340R 


3340 Disk Storage with 
RPS feature (with or 
without 3340 Data 
Module, Model 35) 


- 1 69 




3340R 


3340 Disk Storage with 
RPS feature (with or 
without 3340 Data 
Module, Model 70) 


6A 


DASD 


3340 


3340 Disk Storage without 
RPS feature (with or 
without 3340 Data 
Module, Model 35) 


69 




3340 


3340 Disk Storage without 
ROS feature (with or 
without 3340 Data 
Module, Model 70) 


6A 




3340R 


3344 Direct Access Storage 


6A 




1419 


1255 Magnetic Character 
Reader 


72 




1419 


1259 Magnetic Character 


72 






Reader 




Ml CR -Magnetic Ink 


1419 


1419 Magnetic Character 


72 


Character Recognition 




Reader 




devices 


1419P 


1419 Dual Address Adap- 
ter Primary Control Unit 


73 




1419S 


1419 Dual Address Adap- 
ter Secondary Contr.Unit 


74 




2955 


2955 Data Adapter Unit 


D7 


Data Link for RETAIN 



DEVICE TYPE CODES (. . . .Cont'd) 



Card 
Code 


Actual IBM device 


Device- 
Type XW 


Device Type 


2701 


2701/2715 Data Adapter 


DO 


Teleprocessing lines 


2701 


Integrated Communications 
Adapter (Model 135) 


DO 




A 






A=SAD0 comm'd , 




2702 Transmission Control 


Dl 


B=SAD1 comm'd „„. i. _ 
r- r a^i u enabling 
C=SAD2 comm a , .. 


2702 _ 


unit 




D 






D=SAD3 comm'd 


2703 


2703 Transmission Control 
unit 


D2 




2703 


Integrated Communication 
Adapter (Mod. 115/125) 


D2 




2703 


3704/3705 Communication 
Controller in Emulation 
Mode 


D2 




3704 


3704 Communication 
Controller in Network 
Control Mode 


DC 




3705 


3705 Communication 
Controller in Network 
Control Mode 


DC 




3791 L 


3791 Local Communication 
Controller 


DE 




1419 


1270 Optical Reader/ 
Sorter 


72 




1419 


1275 Optical Reader/ 
Sorter 


72 




1419P 


1275 Dual Address Adapter 
Primary Control Unit 


73 




14T9S 


1275 Dual Address Adapter 
Secondary Control Unit 


74 


Optical Readers 


1287 


1287 Optical Reader 


77 




1288 


1288 Optical Page Reader 


77 




3881 


3881 Optical Mark Reader 


11 




3886 


3886 Optical Character 
Reader 


7C 




3540 


3540 Diskette 


80 


Diskette 




Input/Output Unit 




2260 


2260 Display Station 


CO 




3277 


3277 Display Station; 






(local 3270) 


MODE operand need not 
be entered 






3277B 


3277 Display Station; 


B0 


Display Stations 


(local 3270) 


attached in burst mode to 
a multiplexor channel. 
MODE operand need not 
be entered 






7770 


7770 Audio Response Unit 


D3 


Audio Response Unit 


1017 


1017 Paper Tape Reader 
with 2826 Control Unit 


78 


Paper Tape Readers 


267.1 


2671 Paper Tape Reader 


70 




1018 


1018 Paper Tape Punch 


79 


Paper Tape Punch 




with 2826 Control Unit 




2495TC 


2495 Tape Cartridge 
Reader 


51 


Tape Cartridge Reader 



FORMAT OF THE ESD CARD 



Card 
Columns 



1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2- 4 ESD — External Symbol Dictionary card. 

1 1-12 Number of bytes of information contained in this card. 

15-16 External symbol identification number (ESID) of the first SD,PC, 

CM or ER on this card. Relates the SD,PC,CM or ER to a particular 
control section. 

17-72 Variable information. 

8 positions - Name 

1 position - Type code hex '00', '01', '02', '04', '05', or '0A' to 
indicate SD,LD,ER,PC,CM, or WX respectively. 
3 positions - Assembled origin 
1 position - Blank 

3 positions - Lenghth,if an SD type, CM type, or a PC type. 
If an LD type, this field contains the external symbol identification 
number (ESID) of the SD containing the label. 

73-80 May be used by the programmer for identification. 

FORMAT OF THE TXT CARD 



Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2-4 TXT —Text card. 

6- 8 Assembled origin (Address of first byte to be loaded from this card). 

1 1-12 Number of bytes of text to be loaded. 

15-16 External symbol identification number (ESID) of the control section 

(SD or PC) containing the text. 

17-72 Up to 56 bytes of text — data or instructions to be loaded. 

73-80 May be used for program identification. 

FORMAT OF THE RLD CARD 



Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2- 4 RLD — Relocation List Dictionary Card. 

11-12 Number of bytes of information contained in this card. 

17-72 Variable information (multiple items). 

a. Two positions - (relocation identifier) pointer to the ESID number 
of the ESD item on which the relocation factor of the contents 

of the address constant is dependent. 

b. Two positions 



FORMAT OF THE RLD CARD (....Cont'd) 



Bits 



Two positions - (position identifier) pointer to the ESID number 
of the ESD item on which the position of the address constant 
is dependent. 
One position - flag indicating type of constant, as follows: 



0-2 Ignored 

3 - a non branch type load constant 

I - a branch type load constant 

4-5 00 - load constant length= 1 byte 
01 - load constant length=2 bytes 
10 - load constant length= 3 bytes 

I I - load constant length= 4 bytes 

6 - relocation factor is to be added 

1 - relocation factor is to be subtracted 

7 - Next load constant has different R and P identifiers; 

therefore, both R and P must be present. 
1 - Next load constant has the same R and P identifiers; 
therefore they are both omitted. 

Five significant bits of this byte are expanded in the RSERV printout. 

d. Three positions - assembled origin of load constant. 

73-80 May be used for program identification. 

FORMAT OF THE END CARD 



Card 
Columns 

1 Multiple punch (12-2-9). 
Identifies this as a loader card. 

2 -4 END 

6 -8 Assembled origin of the label supplied to the Assembler in the 

END card (optional). 

15-16 ESID number of the control section to which this END card refers 

(only if 6-8 present). 

17-22 Symbolic label supplied to the Assembler if this label was not defined 

within the assembly. 

29-32 Control section length (if not specified in the last SD or PC). 

73-80 Not used. 

FORMAT OF THE REP (User Replace) CARD 



1 Multiple punch (12-2-9) 
Identifies this as a loader card. 

2 -4 REP - Replace text card. 

5 -6 Blank. 

7-12 Assembled address of the first byte to be replaced (hexadecimal). 

Must be right Justified with leading zero's if needed to fill the field. 

13 Blank 



FORMAT OF THE REP (User Replace) CARD ( Continued) 

Card 
Columns 



External symbol identification number (ESID) of the control section 
(SD) containing the text (hexadecimal). Must be right justified with 
leading zero's if needed to fill the field. 

From 1-11 4-digit hexadecimal fields seperated by comma's, each 
replacing two bytes. A blank indicates the end of information in 
this card. 



71-72 Blank 

73-80 May be used for program identification. 



DEBLOCK UTILITY 



'urposes : 

To block an 80/81 -byte record file to a 3440-byte record file. 

To deblock a blocked 3340-byte file in order to create an 80-byte 
SYSIN file. 

To copy files. 

To print (list) job control statements and comments from a blocked 
input file. 

To select records (or a group of records) from a blocked 3440-byte 
file in order to create an 80-byte SYSIN file. 



The program is only meant to support IBM distribution files that contain 
only 3440-byte blocked records. Eighty-byte deblocked records as output 
and 80 and/or 81 -byte records as input will be processed. 

The devices used for input and output are defined by assigning the input 
device to SYS004 and the output device to SYS005. For the list function the 
output device is SYSLST. 

Block: To block an 80 or 81 -byte record file to a 3440-byte record file. 

Deblock : To deblock the blocked 3440-byte file in order to create an 

80-byte SYSIN file. 

Copy : The card-to-card copy function includes 80-column to 96-column 

conversion for the IBM 5425 Multi-Function Card Unit. 

List : To determine the contents of a file with blocked 3440-byte records. 

Select : To deblock selected PTFs from a blocked PTF file. The function 

can be used for any other 3440-byte blocked sequential file. 



Supported devices : 

IBM 2501 Card Reader 

IBM 2540 Card Read Punch 

IBM 2560 Multi-Function Card Machine 

IBM 3504 Card Reader 

IBM 3505 Card Reader 

IBM 3525 Card Punch 

IBM 5425 Multi-Function Card Unit 

IBM 2400/3400 Series Magnetic Tape Unit 

IBM 2311 Disk Storage Drive 

IBM 2314 Direct Access Storage Facility 

IBM 2319 Disk Storage 

IBM 3330 Disk Storage 

IBM 3333 Disk Storage 

IBM 3340 Direct Access Storage Facility 

The IBM 2495 Tape Cartridge Reader does not belong to the IBM 2400 
Series Magnetic Tape Unit. 



DEBLOCK UTILITY (...Continued) 



When a disk is assigned, a //D LB L and //EXTENT card are required. The file 
names that are used for the DLBL card are : 



//DLBL UIN, 'file ID' 
//DLBL UOUT, 'file ID' 



(for input) 
(for output) 



Tap<» labels and the UPS I byte are not supported, except for deblocked output 
tapes. 

To create a deblocked tape, a//TLBL card or a//UPSI card are required. The 
entries that are used for the TLBL and UPSI cards are : 

//TLBL UOUT, 'file ID' 
//UPSI 00100000 

NO REWIND is always assumed for input/output tapes. Be sure that the tapes 
are correctly positioned. 



Input/Output 

Following is a table showing the input/output devices for the block, deblock, 
select and list functions : 







Block 


Deblock/Select 


List 




Input 


Output 


Input 


Output 


Input 




Record 


80/81 bytes 
unblocked 


80 bytes 
3440 blocked 


80 bytes 
3440 blocked 


80 bytes 
unblocked 


80 bytes 
3440 blocked 


Devices 


Card 
Tape 
Disk 


yes 
yes 

no 


yes 
yes 


no 
yes 
yes 


yes 
yes 
yes 


no 
yes 
yes 



Note : SYSLST is the output device for the list function. 

Following is a table showing the input/output devices for the copy function: 







Copy 




Input 


Output 


Input 


Output 




Record 
Format 


80/81 bytes 
unblocked 


80 bytes 
unblocked 


80 bytes 
3440 blocked 


80 bytes 
3440 blocked 


Devices 


Card 
Tape 
Disk 


yes 
yes 

no 


yes 
yes 
yes 


yes 
yes 


no 
yes 
yes 



Note : When a card device is assigned to SYS004 or SYS005, the program supports 
unblocked files ; otherwise, blocked files are assumed. Be sure you mount 
a tape or disk with records of the required length. 



DEBLOCK UTILITY (...Continued) 



Input/Output (...Continued) 



When the block function is used, you are not allowed to define a disk storage c 
an input device or a card punch as an output device. When the deblock functk 
is used, you are not allowed to define a card reader as an input device. 



Utility Modifier Statement 

Contains information to run the program. 
The format and entries are : 
// UDS ffff 

// U Identifies the utility modifier statement. 

DS Indicates the Deblock program. 

Can be omitted 

ffff Indicates the function specification. 

Can be omitted. The default is DBL. 

ffff=BLK6 Block function. 

ffff=COP5 Copy function. 

ffff=DBL6 Deblock function. 

ffff=LSrt List function. 

ffff=SEL, Select function. 

The following parameters are only required for the select function (see Control 
Statement Stream example 6). 

n Indicates the start position (column number) of the 

fixed part of the select identifier. One or two 
numerics, ranging from 1 to 80, are required. 

'ii. . .ii' Indicates the fixed part of the select identifier. All 

characters are allowed. 

ml Indicates the start position (column number) of the 

variable part of the select identifier. One or two 
numerics, ranging from 1 to 80, are required. 

m2 Indicates the end position (column number) of the 

variable part of the select identifier. One or two 
numerics, ranging from 1 to 80, are required. 

Note : It is not allowed to use apostrophes in a comment in the utility modifier 
statement for the select function. 

The select identifier consists of two parts, a fixed part that is not changed during 
the select operation, and a variable part that is changed for each select by 
reading the next selector card. 

The variable part read in from the selector card, is moved to the select identifier 
positions ml and m2. 



DEBLOCK UTILITY (. . . Continued) 



Utility Modifier Statement ( . . .Continued) 

The selector cards are placed behind the END card. 

If the fixed and variable parts overlap each other, the variable part overwrites the 
fixed part. 

The selected stream of records starts with the record that has the required 
characters in the positions specified by the select identifier. The select operation 
ends by reading a /& card from SYS004. 

The identifiers are searched in the order in which they are read in. Therefore, the 
sequence of the selector cards and the way in which they appear on the input file, 
should be identical. 

Default values 

In the following cases DBL is the default : 

• //UDS 
//U 

• not specified. 



This is the last control statement and cannot be omitted. 

The format is : 
// END 

Control Statement Stream 

Six examples of control statement streams to run the program from the core image 
library are given. 

1. Blocking from card to tape : 

// JOB BLOCK CARD TO TAPE 
//ASSGN SYS004,X'00C' 
//ASSGN SYS005,X'282' 
// EXEC DSTRB 
//END 
// • 



/*EOD (no embedded blanks) 

/& 



DEBLOCK UTILITY (■ . .Continued) 

Control Statement Stream ( Continued) 

2. Deblocking from tape to disk. 

//JOB CREATE SYS INF I LE 

//ASSGNSYS004,X'283' 

//ASSGN SYS005,X132' 

// DLBL UOUT, 'file ID", 99/365 

// EXTENT SYS005, , , , 20, 780 

// EXEC DSTRB 

// UDS DBL 

//END 

/& 

3. Deblocking from tape to tape. 

// JOB DEBLOCK TAPE TO TAPE 
//ASSGN SYS004,X'180' 
//ASSGN SYS005,X'181' 
//TLBL UOUT, 'file ID' 
//EXEC DSTRB 
// UDS DBL 
//END 
/& 

4. Copying card to tape. 

// JOB COPY CARD TO TAPE 
//ASSGN SYS004,X'00C 
//ASSGN SYS005,X'18r 
//TLBL UOUT, 'file ID' 
// EXEC DSTRB 
// UDS COP 
//END 
/& 

5. Listing a blocked tape. 

//JOB LIST BLOCKED TAPE 

//ASSGN SYS004,X'181' 

// EXEC DSTRB 

// UDS LST 

//END 

/& 

6. Selecting from tape. 

// JOB SELECT FROM TAPE 

//ASSGN SYS004,X'180' 

//ASSGN SYSO05,X"00C' 

// EXEC DSTRB 

//UDSSEL,1,'ii...ii',9,14 

//END 

123456 

437298 

/* 

/& 



DEBLOCK UTILITY (...Continued) 



Control Statement Stream (. . .Continued) 



If the identifiers overlap, the second part overwrites the first part. The identifiers 
are searched in the order in which they are read in. Be sure that the cards are in 
the same sequence as the selected records on the input file. 



During blocking, messages will be generated to inform you that the blocked file, 
when deblocked, will fit on 90% of a 2400-foot 7 or 9-track tape or on a 231 1 
disk. Processing continues. These limits (90%) are : 

31,000 records (7-track tape) 

40,000 records (9-track 1600 BP I tape) 

45,000 records (2311 disk). 

Be sure you mount an output tape or disk that can contain the whole file. 



CHAPTER HI 

DOS/VS IOCS (GENERAl/SAty/DA^ISAM) 



STANDARD VOLUME LABEL, TAPE OR DASD 



IBM Standard Volume Label Format (80 bytes) for EBCDIC Tape or DASD 



r-Field Volume label number 



1 


2 


Serial 
Number 


4 


Data 
File 
Directory 


6 
Reserved 


7 
Reserved 


8 

Owner name 
& Address code 


9 
Reserved for future expansion 


_ 


-<i 


c 




s s 


Sj ? 


CO ^ 




W 00 


Label 
Identifier 




Volume 
Security 











FIELD NAME AND LENGTH 

1 LABEL IDENTIFIER 

: 3 bytes 

! 2 VOLUME LABEL NR 

1 byte 

3 VOLUME SERIAL NR 

6 bytes 



VOLUME SECURITY 
1 byte 
(OS/VSonly) 



FIELD NAME AND LENGTH 



DESCRIPTION 



Must contain VOL to indicate that this is 
a Volume Label. 

Indicates the relative position (1-8) of a 
volume label within a group of volume 
labels. 

A unique identification code which is as- 
signed to a volume when it enters an in- 
stallation. This code may also appear on 
the external surface of the volume for 
visual identification.lt is normally a nu- 
meric field 000001 to 999999, however 
any or all of the 6 bytes may be alphameric. 

Indicates security status of the volume: 

0: no further identification for each file of 

the volume is required. 

1: Further identification for each file of 

the volume is required before processing. 



DATA FILE DIRECTORY For DASD only. The first 5 bytes contain 
10 bytes the starting address(CCHHR)of the VTOC. 

The last 5 bytes are blank. For tape files 
this field is not used and should be recor- 
ded as blanks. 



Reserved 



Reserved 



RESERVED 

10 bytes 

RESERVED 

10 bytes 

OWNER NAME AND 

ADDRESS CODE 

10 bytes 

RESERVED 
29 bytes 

All reserved fields should contain blanks to facilitate their use in 
the future. Any information appearing in these fields at the present 
time will be ignored by the DOS/VS and OS/VS programs. 



Indicates a specific customer, installation 
and/or system to which the volume be- 
longs. This field may be a standardized 
code, name, address etc. (OS/VS only). 

Reserved 



STANDARD VOLUME LABEL , TAPE OR DASD (....Cont'd) 
rField i — Volume Label number 



ANSI Standard Volume Label format and contents for ASCII tapes 



Volume 

Serial 

Number 



Owner name and 
Identification code 



Label | Accessibilit y 

Identifier 



Label Standard Level | 



FIELD 

1 



NAME AND LENGTH 

LABEL IDENTIFIER 
3 bytes 

VOLUME LABEL NR 
1 byte 



VOLUME SERIAL NR 
6 bytes 



ACCESSIBILITY 
1 byte 



RESERVED 
20 bytes 



Must contain VOL to indicate that this 
a Volume Label. 

Must be 1. If any other standard volum 
labels are present (indicated by an en- 
try other than 1 in this field)they are 
ignored. 

Uniquely identifies this volume. Must 
consist of 6 bytes and may be any 
character exept a quote('). 

Indicates accessibility protection: 
Space: No accessibility protection. 
Nonspace: Accessibility protection. 

Reserved for future use as required by 
the American National Standards Insti- 
stute, Inc. Should contain spaces. 



FIELD NAME AND LENGTH DESCRIPTION 

6 RESERVED Reserved for future use as required by 

6 bytes American National Standards Institute, 
Inc. Should contain spaces. 

7 OWNER NAME AND Indicates a specific customer, insta I latior 
IDENTIFICATION and /or system to which the volume be- 
CODE longs. This field may be a standardized 
14 bytes code, name, address etc. 



RESERVED 
28 bytes 

LABEL STANDARD 

LEVEL 

1 byte 



Reserved for future use as required by 
the American National Standards Insti- 
tute, Inc. Should contain spaces. 

Indicates whether this volume observes 
the American National Standards: 
Dec. 1: Volume observes the standards 
(1 is also the default value) 
Space: Volume does not observe the 
standards, but it follows an agreed foimat. 



STANDARD MAGNETIC TAPE FILE LABEL 



IBM Standard Tape File Label Format and Contents 



c 


ipIH 














File Security- 












1 


2 


3 
File Identifier 


4 
File 

Number 


5 


6 


7 


8 


9 

Creation 
Date 


10 

Expiration 
Date 


1 


12 

Block 
Count 


13 
System Code 


14 
Reserved 




- CO 


^ 


^ £ 


CN K 


8 5 


P> S 


s a 


o 


9 $ 


5? 5? 


? 


K 8 


^o rv 


2f o 
h* gs 



— Label Number Volume Sequence Nr — 
—Label Identifier File Sequence Number- 



J L 



' — Version Number of Generation 
— Generation Number 



FIELD 
: 1 



NAME AND LENGTH 

LABEL IDENTIFIER 
3 bytes EBCDIC 



FILE LABEL NUMBER 
1 byte EBCDIC 

FILE IDENTIFIER 
17 bytes EBCDIC 
FILE SERIAL NUMBER 
6 bytes EBCDIC 



DESCRIPTION 

Identifies the type of label: 
HDR: Header— beginning of data file. 
EOF: End of File — end of a set of data. 
EOV: End of Volume — end of the phy- 
sical reel. 

Always a 1 

Uniquely identifies the entire file, may 
contain only printable characters. 
Uniquely identifies a file-volume relation- 
ship. This field is identical to the Volume 
Serial Number in the volume label on the 
first or only volume of a multi-volume file 
or a multi-file set .This field will normally 
be numeric(000001 to 999999) but may 
contain any six alphameric characters. 



FIELD NAME AND LENGTH 

5 VOLUME SEQUENCE 

NUMBER 
4 bytes 



6 FILE SEQUENCE 
NUMBER 
4 bytes 

7 GENERATION NUMBER 
4 bytes 

8 VERSION NUMBER OF 
GENERATION 

2 bytes 



DESCRIPTION 

Indicates the order of a volume in a given 
file or multi-file set. This number must be 
numeric(0000-9999). Multiple volumes of 
an output file will be numbered in conse- 
cutive sequence. 

Assign numeric sequence to a file within 
a multifile set. 



Numerically identifies the various editions 
of the file. 

Indicates the version of the generation of 
a file. 



STANDARD MAGNETIC TAPE FILE LABEL (. . . .Cont'd) 
FIELD NAME AND LENGTH DESCRIPT 



IBM Standard Tape File Label Format and Contents 



CREATION DATE 
6 bytes 



EXPIRATION DATE 
6 bytes 



FILE SECURITY 
1 byte 



BLOCK COUNT 
6 bytes 



Indicates the year and the day of the year 
that the file was created: 



1 

2-3 

4-6 



blank 
00-99 
001-366 



FIELD NAME AND LENGTH 

13 SYSTEM CODE 
13 bytes 

14 RESERVED 
7 bytes 



year 

day of year 

uld be entered as 



(e.g.,January 31, 1965 w 
65031) 

Indicates the year and the day of the year 
when the file may become a scratch tape. 
The format of this field is identical to 
field 9. On a multi-file reel processed se- 
quentially,all files are considered to expire 
on the same day. 

Indicates the security status of the file. 
0: No security protection. 
1: Security protection. Additional identifi- 
cation of the file is required before it can 
be processed. 

Indicates the number of data blocks written 
on the file from the last header label to the 
first trailer label, exclusive of tape marks. 
Count does not include checkpoint records. 
This field is used in trailer labels. 



Uniquely identifies the programming 
system. (For DOS/VS: IBMDOSVSJ^J^) 



STANDARD MAGNETIC TAPE FILE LABEL 



ANSI Standard Tape File Label Format and Contents 
i — Accessibi ity 



5 
File 
Section 
Number 



System Code 



£&_ 






I — File Label Number 
Label Identifier 



File Sequence Number — I 



' Version Number of Generation 

Generation Number 



FIELD 
. 1 



NAME AND LENGTH 
LABEL IDENTIFIER 
3 bytes,ASCII 



FILE LABEL NUMBER 
1 byte, ASCI I 



FILE IDENTIFIER 
17 bytes, ASCI I 

SET IDENTIFIER 
6 bytes, ASCI I 



DESCRIPTION 

Identifies the type of label: 
HDR: Header — beginning of a data file. 
EOF: End of File—end of a set of data. 
EOV: End of Volume — end of the phy- 
sical reel. 

Indicates the sequence of this label within 
a label group(HDR,EOF,EOV).DOS/VS 
supports File Label 1 only and ignores sub- 
sequent numbers. 

Identifies the entire file. May be any cha- 
racter exept a quote('). 

Identifies the volume-file relationship. 
Generally, this field is identical to the 
volume serial number from the VOL label 
or the first or only volume of the logical 
file. 



FIELD NAME AND LENGTH 

5 FILE SECTION NUMBER 
4 bytes 

6 FILE SEQUENCE 
NUMBER 

4 bytes 

7 GENERATION NUMBER 
4 bytes 

8 VERSION NUMBER OF 
GENERATION 

2 bytes 



CREATION DATE 
6 bytes 



Indicates the order of a volume in a given 
file or multi-file set. (The first file must be 
numbered 0001). 

Assigns numeric sequence to a file within 
a multi-file set .(The first file must be num- 
bered 0001). 

Numerically identifies this edition of the 
file. (Must be numerical or blank). 

Indicates this version of the generation in 
field 7. (Must be numerical or blank). 

Indicates the year and the day of the year 
that this file was created (byyddd), where: 
b= blank yy= year (00-99) 
ddd= day (001-366) 



STANDARD MAGNETIC TAPE FILE LABEL (. . . .Cont'd) 
FIELD NAME AND LENGTH DESCRIPT 



ANSI Standard Tape File Label Format and Contents 



EXPIRATION DATE 
6 bytes 



ACCESSIBILITY 
1 byte 



BLOCK COUNT 

6 bytes 

SYSTEM CODE 
13 bytes 
RESERVED 

7 bytes 



Indicates the year and the day of the year 
that this file may become a scratch tape. 
Same format as above (Field 9). 

Indicates the accessibility protection of 
the file. 

Space: no accessibility protection . 
Nonspace: accessibility protection. 

Indicates the number of data blocks (phy- 
sical records) written for this logical file. 

Name of programming system. 
(For DOS/VS: IBMDOSVSJ#J#0 

Reserved for future use as required by 
ANSI. (American National Standards Insti- 
tute, Inc.). Should be recorded as spaces. 



FIELD NAME AND LENGTH 



STANDARD DASD FILE LABEL , FORMAT 1 
rField 



(Format 1: This format is common to all data files on Direct Access Storage Devices) 
Creation date ■ ■ r-Expirntion date 




File 

Serial 

Number 



c- o — cs n 



Option codes rRecord length 
'type-—-, I 'I r- — Key length 



Format Identifier! 



Record format — I 
Block length 



o> o* oo 



c 18 
Secon- 
dary 



Last 

Record 

Pointer 



Lower Uppei 



I Data set indicators I 

Key Location I — 



Additional Extent 



-Extent sequence number 
•Extent type indicator 



Sequence number 



Additional Extent 



Spare 

Bytes used in last 
block of directory 
Extent count 



FIELD NAME AND LENGTH 

1 FILE NAME 

44 bytes, alphameric 
EBCDIC 



DESCRIPTION 

This field serves as the key portion of the 
file label. Each file must have a unique 
file name. Duplication of file names will 
cause retrieval errors. The file name can 
consist of three sections: 

1 File ID is an alphameric name assig- 
ned by the user and identifies the file. 
Can be 1-35 bytes if generation and 
version numbers are used, or 1-44 bytes 



FIELD NAME AND LENGTH 



DESCRIPTION 
if they are not used. 

2 G eneration number . If used, this field 
is separated from File ID by a period. 

It has the format Gnnnn, where G iden- 
tifies the field as the generation number 
and nnnn (in decimal) identifies the ge- 
neration of the file. 

3 Version Number of Generation. 

If used, this section immediately follows the 



STANDARD DASD FILE LABEL , FORMAT 1 (... .Cont'd) 



NAME AND LENGTH 

FILENAME 
(Cont'd) 



DESCRIPTION 

generation number and has the format 
Vnn,where V identifies the field as the 
version of generation number and nnn 
(in decimal)identifies the version of 
generation of the file. 
Note: DOS/VS compares the entire 
field against the filename given in the 
DLBL card. The generation and version 
numbers are treated differently by OS/VS. 

The remaining fields comprise the DATA portion of the file label: 



FORMAT IDENTIFIER 1 = Format 1 

1 byte, EBCDIC numeric 

FILE SERIAL NR 
6 bytes, EBCDIC 
alphameric 



VOLUME SEQUENCE 
NR,2 bytes, binary 

CREATION DATE 
3 bytes, discontinuous 
binary 

EXPIRATION DATE 
3 bytes, discontinous 
binary 



Uniquely identifies a file/volume rela- 
tionship. It is identical to the Volume 
Serial Number of the first or only vo- 
lume of a multivolume file. 

Indicates the order of a volume relative 
to the first volume on which the data 
file resides. 

Indicates the year and the day of the 
year the file was created. It is of the form 
YDD, where Y signifies the year(0-99) 
and DD the day of the year( 1-366). 

Indicates the year and the day of the 
year the file may be deleted. The form 
of this field is the same as that of field 5. 



FIELD NAME AND LENG TH 
EXTENT COUNT 



BYTES USED IN LAST 
BLOCK OF DIRECTORY 
I byte, binary 

SPARE 
1 byte 

SYSTEM CODE 
13 bytes 



RESERVED 
7 bytes 

FILE TYPE 
2 bytes 



DESCRIPTION 

Contains a count of the number of extents 
for this file on this volume. If user labels are 
used, the count does not include the user 
label track. This field is maintained by the 
DOS/VS programs. 
Used by OS/VS 



Uniquely identifies the programming system. 
The character codes that can be used in this 
field are limited to EBCDIC characters. On 
input, IOCS ignores this field. On output, 
IOCS inserts IBMDOSVSJ#|#*. 

Reserved 

The contents of this field uniquely identify 

the type of data file: 

Hex 4000: Consecutive organization 

Hex 2000: Direct access organization 

Hex 8000: Indexed sequential organization 

Hex 0200: Library organization 

Hex 0000: Organization not defined in the 

file label 
Hex 0008: VSAM 



STANDARD DASD FILE LABEL , FORMAT 1 (....Cont'd) 



FIELD NAME AND LENGTH 

1 1 RECORD FORMAT 
1 byte 

12 OPTION CODES 



13 BLOCK LENGTH 
2 bytes, binary 

14 RECORD LENGTH 
2 bytes, binary 

15 KEY LENGTH 

1 byte, binary 

16 KEY LOCATION 

2 bytes, binary 

17 DATA SET 
INDICATORS 
1 byte 



DESCRIPTION 
Used by OS/VS 

Bits within this field indicate various options 

used in building the file: 

Bit 0: 

Bit 1: Reserved 

Bit 2: Master index present (ISAM) 

Bit 3: Independent overflow present (ISAM) 

Bit 4: Cylinder overflow present (ISAM) 

Bit 5: Reserved 

Bit 6: Delete record (OS/VS) 

Bit 7: Reorganize (OS/VS) 

Indicates the block length for fixed length 
records or maximum block size for variable 
length blocks. 

Indicates the record length for fixed length 
records or the maximum record length for 
variable length records. 

Indicates the length of the key portion of 
of the data records in the file. 

Indicates the high order position of the data 
records 

Bits within this field are used to indicate the 

following: 

Bit 0: If on, indicates that this is the last 



FIELD NAME AND LENGTH 



SECONDARY 
ALLOCATION 

4 bytes, binary 

LAST RECORD POINTER 

5 bytes, discontinuous 
binary 

SPARE 
2 bytes 
EXTENT TYPE 
INDICATOR 
1 byte 



DESCRIPTION 

volume on which this file normally resides. 
Bit 1,2,4,6,7: for DOS/VS-Used by 

OS/VS. 
Bit 3: If on, data set security is invoked. 
Bit 5. Used by D OS/VS and OS/VS. 

Used by OS/VS 



Used by OS/VS 



Reserved 

Indicates the type of extent with which the 
following fields are associated: 
HEX CODE 

00: Next three fields do not indicate any 
extent. 

01: Prime data area(lndexed sequential), 
or Consecutive area, etc. , (i. e. , the extent 
containing the user's data records) 
02: Overflow area of an indexed sequen- 
tial file. 

04: Cylinder index or master index area of 
an indexed sequential file. 
40: User label track area. 
80: Shared cylinder indicator. 



STANDARD DASDFILE LABEL , FORMAT 1 (....Cont'd) 



FIELD NAME AND LENGTH 



DESCRIPTION 



FIELD NAME AND LENGTH 



EXTENT SEQUENCE NR Indicates the extent sequence in a 
1 byte, binary multi-extent file. 

LOWER LIMIT The cylinder and the track address 

4 bytes, discontinuous specifying the starting point(lower 

binary limit) of this extent component. This 

field has the format CCHH. 



ADDITIONAL EXTENT 
10 bytes 

ADDITIONAL EXTENT 
10 bytes 

POINTER TO NEXT 
FILE LABEL WITHIN 
THIS LABEL SET 
5 bytes, discontinuous 
binary 



These fields have the same format as 
the fields 21-24 above. 

These fields have the same format as 
the fields 21-24 above. 

The address (format CCHHR) of a con- 
tinuation label if needed to further describe 
the file. If field 10 indicates Indexed 
Sequential organization, this field points 
to a Format 2 file label within this label 
set. Otherwise, it points to a Format 3 file 
label, and then only if the file contains 
more than three extent segments. This field 
contains all binary zeros if no additional 
file label is pointed to. 



STANDARD DASD FILE LABEL , FORMAT 2 

High Level Index Development Indicator 1 

Index levels— I 



Last 2d Level Master Index Entry Address 
Field 



Address of 
2d Level 
Master Index 



Address of 
3d Level 
Master lnde> 



Last 3d Level Master Index Entry Address 

1 



Last Data Track in Cylinder 

Number Tracks for Cylinder Overflow 
I — Highest "R" on high Level Index Track 
— Highest "R" on Prime Track 

I Highest "R" on Overflow Track 

I "R" of last Data Record on shared Track 



Dll 



D12 



D13 



DUD 
15 



D16 
Prime 
Record 
Count 



High Record on Track Index Track - 

Tag Deletion Count - 

Non first Overflow Reference Count -T 



Number Tracks for Highest Level Index 
-Number bytes for Highest Level Index 



Bytes r< 



D18 
Address of 
Cylinder 


D19 
Address of 
Lowest Level 


D20 
Address of 
Highest Level 


D21 
Last Prime 
Data Record 
Address 


D22 


D23 


D24 


D25 
.ast Indepen- 
Jent Overflow 


D26b27D28 329 


D30 


D31 
Pointer 


n o- 


o »o 


rx ro 


t o 


2 2 


2 Z 


S z 




S 


s 




22 2 


2 ? 



Last Track Index Entry Address — ' 
Last Cylinder Index En try Address- 



Number of independent Overflow Trac 

Overflow Record Count 

Cylinder Overflow 
Area Count 



— Last Master Index Entry Address 



SEE NEXT PAGE FOR FURTHER EXPLANATION 



STANDARD DASD FILE LABEL , FORMAT 2 (....Cont'd) 
FIELD NAME AND LENGTH DESCRIPTK 



KEY IDENTIFICATION This byte contains the hex code 02 in 
1 byte order to avoid conflict with a file name. 



ADDRESS OF 2d LEVEL 

MASTER INDEX 

7 bytes,discontinuous 

binary 

LAST 2d LEVEL MASTER 

INDEX ENTRY 

5 bytes,discontinuous 

ADDRESS OF 3d LEVEL 

MASTER INDEX 

7 bytes,discontinuous 

binary 

LAST 3d LEVEL MASTER 

INDEX ENTRY 

5 bytes, discontinuous 

binary 

SPARE 

19 bytes 

FORMAT IDENTIFIER 

1 byte, EBCDIC numeric 

NUMBER OF INDEX 

LEVELS 

1 byte,binary 



This field contains the address of the 

first track of the second level of the 

master index, in the form MBBCCHH. D4 

(OS/VS only) 

This field contains the address of the 
last index entry in the second level D5 

of the master index,of the form CCHHR. 
(OS/VS only) 

This field contains the address of the first D6 

track of the third level of the master index, 
in the form MBBCCHH. 



This field contains the address of the last 
entry in the third level of the master 
index,in the form CCHHR. (OS/VS only) 

Reserved 
2: Format 2 

The contents of this field indicate how 
many levels of index are present with an 
Indexed Sequential File. 



FIELD NAME AND LENGTH 

D3 HIGH LEVEL INDEX 

DEVELOPMENT 
INDICATOR 
1 byte, binary 

D4 FIRST DATA RECORD 

IN CYLINDER 
3 bytes 



DESCRIPTION 

This field contains the number of tracks 
determining development of Master Index. 
(OS/VS only) 

This field contains the address of the last 
data track on each cylinder in the form HHR. 



LAST DATA TRACK IN This field contains the address of the last 
CYLINDERS data track on each cylinder, in the form HH. 

2 bytes 



This field contains the number of tracks ii 
cylinder overflow area. (OS/VS only) 



NUMBER OF TRACKS 
FOR CYLINDER 
OVERFLOW 
1 byte, binary 

HIGHEST "R" ON HIGH This field contains the highest possible R 
on track containing high-level index 
entries. 

This field contains the highest possible R 
on prime data tracks for form F records. 

This field contains the highest possible R 
on overflow data tracks for form F records. 



LEVEL INDEX TRACK 
1 byte 

HIGHEST "R" ON 
PRIME TRACK 
1 byte 

HIGHEST "R" ON 
OVERFLOW TRACK 
1 byte 



STANDARD DASD FILE LABEL , FORMAT 2 (....Cont'd) 
FIELD NAME AND LENGTH DESCRIPTK 



FIELD NAME AND LENGTH 



"R" OF LAST DATA 
RECORD ON SHARED 
TRACK -1 byte 

HIGH RECORD ON 
TRACK INDEX TRACK 
2 bytes 

TAG DELETION 
COUNT 

2 bytes,binary 

NONFIRST OVERFLOW 
REFERENCE COUNT 

3 bytes,binary 

NUMBER OF BYTES 
FOR HIGHEST LEVEL 
INDEX-2 bytes binary 

NUMBER OF TRACKS 

FOR HIGHEST LEVEL 

INDEX 

1 byte, binary 

PRIME RECORD COUNT 

4 bytes, binary 

STATUS INDICATOR 
1 byte 



This field contains the R of the last data 
record on a shared track. 

The first byte of this 2-byte field indi- 
cates the high(0-256) record on the track 
index track. The second byte is reserved. 

This field contains the number of records 
that have been tagged for deletion. 

This field contains a count of the number 
of random references to a nonfirst over- 
flow record. 

The contents of this field indicate how 
many bytes are needed to hold the highest 
level index in main storage. 

This field contains a count of the number 
of tracks occupied by the highest level 
index. 

This field contains a count of the number 
of records in the prime data area. 

The eight bits of this byte are used for the 

following indications: 

Bit 0-1 : must remain off 

Bit 2 : file closed for ADD or ADDRTR 

Bit 3-5 : must remain off 

Bit 6 : last block full-Bit 7: last track full 



ADDRESS OF CYLINDER This field contains the address of first track 



INDEX 
7 bytes 

ADDRESS OF LOWEST 
LEVEL MASTER INDEX 
7 bytes 

ADDRESS OF HIGHEST 
LEVEL INDEX 

7 bytes 

LAST PRIME DATA 
RECORD ADDRESS 

8 bytes 

LAST TRACK INDEX 
ENTRY ADDRESS 
5 bytes 

LAST CYLINDER INDEX 
ENTRY ADDRESS 
5 bytes 

LAST MASTER INDEX 
ENTRY ADDRESS 
5 bytes 

LAST INDEPENDENT 
OVERFLOW RECORD 
ADDRESS 
8 bytes 



of the cylinder index, in the form MBBCCHH. 

This field contains the address of the first 
track of the lowest-level index of the high 
level indexes, in the form MBBCCHH. 

This field contains the address of the first 
track of the highest level master index, in 
the form MBBCCHH. 

This field contains the address of the last 
data record in the prime data area, in the 
formMBBCCHHR. 

This field contains the address of the last 
normal entry in the track index on the last 
cylinder in the form CCHHR 

This field contains the address of the last 
index entry in the cylinder index in the 
form CCHHR. 

This field contains the address of the last 
'in the master index, in the form 



index entry i 
CCHHR. 

This field contains the address of the last 
record written in the current independent 
overflow area, in the form MBBCCHHR. 



STANDARD DASD FILE LABEL , FORMAT 2 ( Cont'd) 

FIELD NAME AND LENGTH DESCRIPTION FIELD NAME AND LENGTH DESCRIPTION 

D26 BYTES REMAINING ON This field contains the number of bytes 

OVERFLOW TRACK remaining on current independent 

2 bytes, binary overflow track. (OS/VS only) 

D27 NUMBER OF INDEPEN- This field contains the number of tracks 

OVERFLOW TRACKS remaining in independent overflow area 

2 bytes, binary 

D28 OVERFLOW RECORD This field contains a count of the number 

COUNT of records in the overflow area. 

2 bytes, binary 

D29 CYLINDER OVERFLOW This field contains the number of 

AREA COUNT cylinder overflow areas full. 

2 bytes, binary 

D30 DUMMY TRACK INDEX This field contains the HHR portion of 

ENTRY the dummy track index entry. 

3 bytes (OS/VS only) 

D31 POINTER TO FORMAT This field contains the address(in the 

3 FILE LABEL form CCHHR) of a Format 3 file label 

5 bytes if more than 3 extent segments exist for 

the data file within this volume. 

Otherwise it contains binary zeros. 

(OS/VS only) 



STANDARD DASD FILE LABEL , FORMAT 3 



Extent Typo Indicator 



Format 3: This format is used to describe extra extent segments on the volume if there 
are more than can be described in the Format 1 (and Format 2 if it exists) file label. 
This file label is pointed to by a Format l,Format 2, or another Format 3 file label. 



1 

Key 
Identi- 
fication 


Extent 1 


Extent 2 


Extent 3 


Exten 


t4 


18 


Extent 5 


Extent 6 


Exten 


t 7 


2 




Lower 
Limit 


Limit 
























17 


19 






















30 


— -^ 


m 


o 


o 




- 






s 








3S 






5 


3$ 






m-c 






3 J 






rv 



Extent Sequence Number 



Format Identifier 



Extent 8 


Extent 9 


Extent 10 


Extent 11 


Extent 12 


Extent 13 


55 


31 














































54 


-o 








o 






Ov 


0- 






o 


§ 






ZZ 






£S 






8 


2 2 



NAME AND LENGTH 

KEY IDENTIFICATION 
4 bytes 

EXTENTS (in KEY) 
40 bytes 

FORMAT IDENTIFIER 
1 byte, EBCDIC numeric 



DESCRIPTION 



FIELD NAME AND LENGTH 



Each byte of this field contains the Hex code 19-54 
03 in order to avoid conflict with a data 
file name. 

Four groups of fields identical in format to 55 
fields 21-24 in the Format 1 label are con- 
tained here. 



ADDITIONAL 
EXTENTS 
90 bytes 

POINTER TO NEXT 
FILE LABEL 
5 bytes 



Nine groups of fields identical in format 
to fields 21-24 in the Format 1 label 
are contained here. 

This field contains the address(in the form 
CCHHR) of another Format 3 label if 
additional extents must be described. 
Otherwise, it is all binary zeros. 



STANDARD DASD FILE LABEL , FORMAT 4 



This format Is used to describe the Volume Table 
of Contents and is always the first label in the 
VTOC. There must be one and only one of these 
Format 4 file labels per volume. 



r— Nu 



•Number of Alternate Tracks 
■VTOC Indicators 
Number of Extents 
I— Reserved 



1 

Key 


2 


3 
Last 
Active 
Format 1 


4 


5 
Highest 
Altern. 
Track 


6 


7 


8 
A 


8 
B 


Device Constants 


? 


Device 
Size 


|1 


111 


— o§ c - 


5 




S 8 




5? » 


So 




8 


<j 


5 


•o 


K 




ro^j-o< 



I Available File Label Records. 



VSAM indicators 10A 


10B 
Reserved 


VTOC Extent 


15 
Reserved 


VSAM 
Timestamp 


2. 


u 


VSAM 
Timestamp 


11 






14 


In oS 


00 


•o rx co ir> 


m<irvoo — 
«o £222 71 


^ £ 


-o o 



FIELD NAME AND LENGTH 

1 KEY FIELD 

44 bytes, binary 

2 FORMAT ID 

1 byte, EBCDIC numeric 



DESCRIPTION 

Each byte of this field contains the Hex 
code 04 in order to provide a unique key. 

4 : Format 4 . 



LAST ACTIVE FORMAT 1 Contains the address(in the form.CCHHR) 



5 bytes 



NEXT AVAILABLE 
ALTERNATE TRACK 



of the last active Format 1 file label.lt 
is used to stop a search on a file name. 
(OS/VSonly) 

Contains the address(in the form CCHH) 
of the next track to be assigned as an 



FIELD NAME AND LENGTH 

5 4 bytes 

6 NUMBER OF ALTER- 
NATE TRACKS 

2 bytes, binary 

7 VTOC INDICATORS 



DESCRIPTION 

alternate for a bad track. 

Contains the number of alternate tracks 
available. 



Bit 0,if on indicates no DADSM(Format 5) 

label, or DADSM label does not reflect 

true status of volume. 

Bits 1,2 not used. 

Bit 3, if on indicates a stacked pack for the 

1401/1440/1460 Emulator Program. 

Bits 4-7 are not used. 



STANDARD DASD FILE LABEL , FORMAT 4 (....Cont'd) 



FIELD NAME AND LENGTH DESCRIPTION 

8A NUMBER OF EXTENTS Contains the hexadecimal constant 01, to 



1 byte 

RESERVED 

2 bytes 

DEVICE CONSTANTS 
14 bytes 



indicate one extent in the VTOC. 
Reserved 

This field contains constants describing the 
device on which the volume was mounted 
when the VTOC was created. The following 
describes each of the subfields: 



Device Size: (4 bytes)-The number of cylinders(CC) and tracks per cyl- 

= inder(HH). 

^ Track Length: (2 bytes)-The number of available bytes on a track exclusive 

"^ of home address and record zero. (record zero is assumed to 

be a nonkeyed record with an eight bytes data field) 
Record Overhead: (3 bytes)-The number of bytes required for gaps,check bits, Labels/track: 
and count field for each record. This value varies according 
to the record characteristics and thus is broken down into 
three three subfields. 

I: Overhead required for a keyed record other than the last Directory Blocks/ 

record on the track. Track 

L: Overhead required for a keyed record that is the last 

record on the track. 
K: Overhead bytes to be subtracted from I or L if the record 
does not have a key field. 
Flag: (1 byte)-Further defines unique characteristics of the device. 



0-5 : Reserved 

6/7 : CC and HH must be used as 1-byte values, as in the 

case of the 2321 .A tolerance factor must be applied 

to all but the last record on the track. 
(2 bytes)-A value that is to be used to determine the ef- 
fective length of the record on the track. The effective 
length of a record is calculated in the following manner: 

1 Add the key length to the data length of the record 

2 Test bit 7 in the flag byte: 
a: If 0,go to step 3 

b: Multiply value from step 1 by the tolerance factor 

c: Add overhead bytes to the result 
Note: Step 2 is not required if the calculation is for the 
last record on the track. 

(1 byte)-A count of the number of labels that can be written 
on each track in the VTOC. (Number of full records of 
44-bytes key and 96-bytes data lengths that can be contain- 
ed on one track of this device) 

(1 byte)- A count of the number of directory blocks that can 
be written on each track for an OS/VS partitioned data set. 
(Number of full records of 8-bytes key and 256-bytes data 
lengths that can be contained on one track of this device) 



STANDARD DASD FILE LABEL, FORMAT 4 (...Cont'd) 



FIELD 


NAME AND LENGTH 




DESCRIPTION 






FIELD 


NAME AND LENGTH 


9 


DEVICE CONSTANTS 


Thefollov 


ving i 


llustrates the device con- 


10A 


VSAM CATALOG 




(...Cont'd) 




stants fiel 


d for the vai 


rious di 


irect access 


(Cont'd) (1 byte) 










dev 


ices: 














Device 


CC 


HH 


Track 
Length 


1 


I 


K 


Flag 


Tol. 


Labels 
Track 




TT of CRA 
(2 bytes) 


2311 

2314/ 

2319 


203 
203 


10 
20 


3625 
7294 


81 
146 


20 
45 


20 

45 


1 
1 


537 

534 


16 
25 




VSAM TIMESTAMP 
(8 bytes) 


2321 
2301 


20/10 



5/20 
200 


2000 
20616 


100 
186 


16 
186 


16 
53 


3 



537 
512 


8 
63 


10B 


RESERVED 
(10 bytes) 


2302 


250 


46 


5070 


82 


55 


20 


1 


537 


22 




3330 
3340 


411 


19 


13030 


191 


191 


56 





512 


39 


11-14 


VTOC EXTENT 


(35MB) 


350 


12 


8368 


242 


242 


75 





512 


22 






3340 
























(70MB) 


700 


12 


8368 


242 


242 


75 





512 


22 






7320 





400 


2129 


111 


43 


14 


1 


537 


8 







: CCHH for the 2321 above are separate 1 byte quantities. 



VSAM INDICATORS 
(19 bytes) 



VSAM TIMESTAMP 
(8 bytes) 



The VSAM indicators are present on 
any volume that contains space 
allocated to VSAM. If a volume 
does not contain any VSAM-owned 
space, these fields are set to zeros. 

Is the time the most recent VSAM 
data space was added to the volume. 



RESERVED 
(25 bytes) 



Bit0-1 : This volume is owned by 

a VSAM catalog. 
Bit 1-7: Unused 

Relative track number of first track 
of catalog recovery area 



These fields describe the extent of 
the VTOC and are identical in 
format to fields 21-24 of the 
Format 1 file label. Extent type 
01 (prime date area). 

Reserved 



STANDARD DASD FILE LABEL , FORMAT 5 (Note: Forma! 5 Label used by OS/VS only) 

rField 



Available 
Extent 



Available Extents in Key 



rn 



Available Extents 



L_ 


-Key Identification 




1 Format Identif 










28 


29 
Pointer 






Available Extents 




to next 
Format 5 


CO 






2 


•o o 



FIELD NAME AND LENGTH 



DESCRIPTION 



FIELD NAME AND LENGTH 



DESCRIPTION 



KEY IDENTIFICATION Each of these four bytes is an hex 05. 3-9 

4 bytes 

AVAILABLE EXTENT This field indicates an extent of space avail- 10 

5 bytes able for allocation to a data file. The first 

two bytes are relative track address. The next . . „ R 
two are the number of full cylinders included 
in the extent. The last byte is the number of 
tracks in addition to the cylinders in the ex- 
tent. 29 



AVAILABILITY EXTENTS These fields are identical to field 2. 



IN KEY 35 bytes 

FORMAT IDENTIFIER 
1 byte EBCDIC numeric 

AVAILABLE EXTENTS 
90 bytes 

POINTER TO NEXT 
FORMAT 5 



They are in relative track address sequence. 
5 : Format 5 

These fields are the same as field 2. There are 
26 available extents fields in the Format 5 
label. 

Contains the address(in the form CCHHR) of 
the next Format 5 file label if one exists. 



LABEL INFORMATION CYLINDER 



Disk Pack 








I, 2 or 3 partition syste 


m 


4 partition system 


5 partition system 


' ype Track 


Trad 




Track 








c 



1 

2 
3 
4 

5 5 

6 
7 
8 
9 
10 
, 11 


BG (USRLABEL) * 


Temporary 

Standard (Permanent) 1 

Temporary 2 

Standard (Perm.) 3 

Temporary 4 

Standard (Perm.) 5 

6 

7 

8 

9 

10 

-Standard (Perm.) 11 

18 
19 


BG (USRLABEL) * 


Temporary 

Standard (Permanent) 
Temporary 
Standard (Perm.) 
Temporary 
Standard (Perm.) 
Temporary 
Standard (Perm.) 

1 
-Standard (Perm.) 1 

1 
1 


BG (USRLABEL) * 


Temporary 




BG (PARSTD) 


BG (PARSTD) 


1 BG (PARSTD) 


Standard (Permanent) 




F2 (USRLABEL)* 


F3 (USRLABEL) * 


2 F4 (USRLABEL) * 


Temporary 




F2 (PARSTD) 


F3 (PARSTD) 


3 F4 (PARSTD) 


Standard (Perm.) 




Fl (USRLABEL)* 


F2 (USRLABEL) * 


4 F3 (USRLABEL)* 


Temporary 




Fl (PARSTD) 


F2 (PARSTD) 


5 F3 (PARSTD) 


Standard (Perm.) 






Fl (USRLABEL)* 


6 F2 (USRLABEL) * 


Temporary 


= o» 




Fl (PARSTD) 


7 F2 (PARSTD) 


Standard (Perm.) 


o a 






8 Fl (USRLABEL)* 


Temporary 


2 l 






9 Fl (PARSTD) 


Standard (Perm.) 





















1 


-Standard (Perm.) 




, 1 


8 


(STDLABEL) 

Standard Labels 

for 

— all partitions 


(STDLABEL) 

Standard Labels 
for 
— all partitions 


(STDLABEL) 

Standard Labels 
for 

— all partitions 

8 








19 






9 





Note: The Label Information Cylinder is located on the first full cylinder after last library on SYSRES. 

* Label sets submitted in a job stream without a //OPTION PARSTD, STDLABEL are written to the temporary area for the partit 



LIOCS MODULE NAME VERSUS OPTIONS 



character # ^- 


1 


2 


3 


4 


5 


6 


7 


8 


CDMOD 


1 


J 


C 


F RECFORM=FIXUNB 


A CTLCHR=ASA(not 


B RDONLY=YESand 


Z WORKA and IOAREA2 


DEVICE= 2540, 3881 










(always for TYPEFLE= 


specified if CMBND) 


TYPEFLE= CMBND 


not specified 


1 DEVICE= 1442,2596 










INPUT, TYPEFLE= 


Y CTLCHR=YES 


C TYPEFLE= CMBND 


W WORKA= YES 


2 DEVICE=2540 










CMBNDorFUNC=l 


C CONTROL=YES 


H RDONLY=YESand 


1 IOAREA2= YES 


3 DEVICE=2501 










files) 


Z CTLCHR or CON- 


TYPEFLE= INPUT 


B WORKA and IOAREA2 


4 DEVICE= 2540 and 










V RECFORM= VARUNB 


TROL not specified 


1 TYPEFLE= INPUT 


Z WORKA=YESnot 


CRDERR 










U RECFORM= UNDEF 




N RDONLY= YES and 

TYPEFLE= OUTPUT 

TYPEFLE= OUTPUT 


specified (CMBND 
file only) 


5 DEVICE=2520 and 
CRDERR 

6 DEVICE=3505or 
3504 

7 DEVICE= 3525 and 
FUNC=R/P or 
omitted 

8 DEVICE=2560 and 
FUNC=R/P or 
omitted 

A DEVICE= 3525 and 

FUNC=RP 
B DEVICE=3525 and 

FUNC=RW 
C DEVICE= 3525 and 

FUNC=PW 
D DEVICE=3525 and 

FUNC=I 
E DEVICE= 3525 and 

FUNC=RPW 
F DEVICE=2560 and 

FUNC=RP 



LIOCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



character / <♦■ 


1 


2 


3 


4 


5 


6 


7 


8 


CDMOD 
(Cont'd) 
















G DEVICE= 2560 and 

FUNC=RW 
H DEVICE=2560 and 

FUNC=PW 
1 DEVICE=2560 and 

FUNC=I 
J DEVICE=2560 and 

FUNC=RPW 
K DEVI CE=5425 and 

FUNC=RP 
L DEVICE=5425 and 

FUNC=RW 
M DEVICE=5425 and 

FUNC=PW 
N DEVICE=5425 and 

FUNC=I 
O DEVICE=5425 and 

FUNC=RPW 


DIMOD 


1 


J 


J 


F always 


C non-RPS version 

of module 
V RPS data set 


B TYPEFLE=OUTPUT 
(processes both in 
put and output) 

1 TYPEFLE=INPUT 


1 IOAREA2=YES 

Z IOAREA2=YES is 

not specified 


C RDONLY=YES 
D RDONLY=YES is 
not specified 


DRMOD 


1 


J 


M 


Z 


S SETDEV=YES 

Z SETDEV=YES 

not specified 


R RDONLY=YES 
Z RDONLY=YESnot 
specified 


D always 


a Iways 


DUMOD 


1 


J 


N 


D 


1 -DUMODFI 
O =DUMODFO 


C ERROPT=YES and 

ERREXT=YES 
E ERROPT-YES 
Z neither is specified 


Z 


Y RDONLY=YES 

Z RDONLY not specified 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



character /♦ 


1 


2 


3 


4 


5 


6 


7 


8 


MRMOD 


1 


J 


U 


S Address=SINGLE 
D Address=DUAL 


Z 


Z 


Z 


Z 


MTMOD 
(GET/PUT) 


1 


J 


F 


F RECFORM=FIXUNB 

(orFIXBLK) 

(EBCDIC mode) 
1 RECFORM=FIXUNB 

(orFIXBLK) 

(ASCII mode) 
V RECFORM=VARUNB 

(or VARBLK) 

(EBCDIC mode) 
R RECFORM=VARUNB 

(or VARBLK) 

(ASCII mode) 
S RECFORM=SPNUNB 

(or SPNBLK) 

(spanned records) 
U RECFORM=UNDEF 

(EBCDIC code) 
N RECFORM=UNDEF 

(ASCII mode) 


B READ-BACK 

Z READ=FORWARD or 

if READ is not spec! 

fied 


C CKPTREC=YES 

Z CKPTREC-YES is 

not specified 


W WORKA=YES 
Z WORKA=YES is not 
specified 


E ERREXT=YESand 

RDONLY=YES 
N ERREXT=YES 
Y RDONLY=YES 
Z ERREXT and RDON 
LY not specified 


MTMOD 
(WORKFILE) 


I 


J 


F 


W always 


E ERROPT=YES 

Z ERROPT is not 

specified 


N NOTEPNT-YES 
S NOTEPNT=POINTS 
Z NOTEPNT is not 
specified 


Z always 


M ERREXT=YESand 

RDONLY=YES 
N ERREXT=YES 
Y RDONLY=YES 
Z ERREXT and RDON 
LY not specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



character / + 


1 


2 


3 


4 


5 


6 


7 


8 


ORMOD 


1 


J 


M 


F RECFORM=FIXUNB 
X RECFORM=FIXBLK 
U RECFORM=UNDEF 
D RECFORM=UNDEF 
and BLKFAC=YES 


C CONTROL=YES 

Z CONTROL=YES is 

not specified 


1 IOAREA2=YES 
W WORK A= YES 
B both are specified 
Z neither is specified 


T device is in tape 

D device is in docu- 
ment mode 


Z always 


PRMOD 


1 


J 


D 


F RECFORM=FIXUNB 
V RECFORM=VARUNB 
U RECFORM=UNDEF 


A CTLCHR=ASA 

Y CTLCHR=YES 

C CONTROL=YES 

S STLIST=YES 

Z none of these is spe- 
cified 

T DEVICE=3525 with 
2-line printer 

U DEVICE=2560 

V DEVICE=5425 


B ERROPT=YES and 
PRINTOV=YES 

P PRINTOV=YES, 
DEVICE is not 3525 
and ERROPT is not 
specified 

1 PRINTOV=YES, 
DEVICE=3525 and 
FUNC=WCT]or 
omitted 

F PRINTOV=YES, 
DEVICE=3525 and 
FUNC=RWtT3 

C PRINTOV=YES, 
DEVICE=3525 and 
FUNC=PWCT3 

D PRINTOV=YES, 
DEVICE=3525 and 

func=rpw:t] 

Z PRINTOV=YES and 
ERROPT not speci- 
fied and DEVICE is 
not 2560, 3525, or 
5425 


1 IOAREA2=YES 

Z IOAREA2=YES is 

not specified 


V RDONLY=YES 
and WORKA=YES 

W WORKA=YES 

Y RDONLY=YES 

Z neither is specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



PRMOD 
(Cont'd) 



O PRINTOV=YES not 
specified, DEVICE= 
3525 and FUNCT= 
WCn or omitted 

R PRINTOV=YES not 
specified, DEVICE= 
3525 and F UN a= 

Rwm 

S PRINTOV=YES not 
specified, DEVICE= 
3525 and FUNCT= 
PWCT] 

T PRINTOV=YES not 
specified, DEVICE= 
3525 and FUNCT= 
RPWCT3 

E ERROPT=YES and 
PRINTOV=YES is 
not specified 

U FUNC=W or omitted 
and DEVICE=2560 
or 5425 

V FUNC=RWand 

DEVICE=2560 or 5425 

W FUNC=PW and 

DEVICE=2560 or 5425 
FUNC=RPWand 
DEVICE=2560 or 5425 



LIQCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



character ft + 


1 


2 


3 


4 


5 


6 


7 


8 


PTMOD 


1 


J 


E 


S SCAN=YES 
Z SCAN -YES is not 
specified 


T TRANS=YES(SCAN) 
=YES is not speci- 
fied) 

Z TRANS=YES is not 
specified 


F RECFORM=FIXUNB 

and SCAN=YES 
U RECFORM=UNDEF 

and SCAN=YES 
Z SCAN=YES is not 

specified and/or 

DEVICE=1018 


1 DEVICE=1017 

2 DEVICE=1018 

Z DEVICE=2671 or if 
this entry is omitted 


Z always 


SDMOD 
(GET/PUT) 


1 


J 


G 


C SDMODFx specifies 

HOLD=YES 
F SDMODFx does not 

specify HOLD=YES 
R SDMODUx specifies 

HOLD=YES 

U SDMODUx does not 
specify HOLD=YES 

P SDMODVx specifies 
HOLD=YES (span- 
ned records) 

Q SDMODVx does not 
specify HOLD=YES 
(spanned records) 

S SDMODVx specifies 
HOLD=YES 

V SDMODVx does not 
specify HOLD=YES 


1 SDMODxl (non-RPS 
version of module) 

O SDMODxO (non-RPS 
version of module) 

U SDMODxU (non-RPS 
version of module) 

W SDMODxl (RPS in- 
put data set) 

X SDMODxO (RPS out 
put data set) 

Y SDMODxU (RPS up- 
date data set) 


C ERROPT=YES and 

ERREXT=YES 
E ERROPT=YES 
Z neither is specified 


M TRUNCS=YESand 

FEOVD=YES 
T TRUNCS=YES 
W FEOVD=YES 
Z neither is specified 


B CONTROL=YES 

andRDONLY=YES 
C CONTROL=YES 
Y RDONLY=YES 
Z neither is specified 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



Character / ^ 


1 


2 


3 


4 


5 


6 


7 


8 


SDMOD 


1 


J 


G 


T HOLD=YES 


C ERROPT=YES and 


N 


NOTEPNT=YES 


C 


CONTROL=YES 


T RDONLY-YESand 


(WORK FILES) 








W HOLD=YES not 
specified 


ERREXT=YES 
E ERROPT=YES 
W RPS version of 

module 
Z neither is specified 


R 

Z 


NOTEPNT=POINT 

RW 

NOTEPNT is not 

specified 


Z 


CONTROL=YES is 
not specified 


UPDATE=YES 
U UPDATE=YES 
Y RDONLY=YES 
Z neither is specified 


DAMOD 


1 


J 


1 


F RECFORM=FIXUNB 
B RECFORM-UNDEF 


A AFTER=YES 

VV RPS version of module 


E 


IDLOC=YES and 
FEOVD=YES 


H 


ERREXT=YES and 
RELTRL=YES 


W HOLD=YES and 
RDONLY=YES 










handles both UNDEF 


Z AFTER is not 


1 


IDLOC=YES 


P 


ERREXT=YES 


X HOLD=YES 










andFIXUNB 


specified 


R 


FEOVD=YES 


R 


RELTRK=YES 


Y RDONLY=YES 










S RECFORM=SPNUNB 




Z 


neither is specified 


Z 


neither is specified 


Z neither is specified 










V RECFORM=VARUNB 














ISMOD 


1 


J 


H 


A RECFORM=BOTH, 


A lOROUT=ADDRTR 


B 


TYPEFLE-RANSEQ 


B 


CORINDX=YESand 


F CORDATA=YES, 










IOROUT=ADD or 


(non-RPS version of 


G 


IOAREA2=YES 




HOLD=YES 


ERREXT=YES, 










ADDRTR 


module) 
1 lOROUT=ADD 




TYPEFLE=SEQNTL 
or IOROUT=LOAD 


O 

Z 


HOLD=YES 
neither is specified 


RDONLY=YES 










B RECFORM=FIXBLK, 


L |OROUT=LOAD (non- 


R 


TYPEFLE=RANDOM 






G CORDATA=YES 










IOROUT=ADD or 


RPS version of module 


5 


TYPEFLE=SEQNTL 






and ERREXT=YES 










ADDRTR 


R lOROUT=RETRVE 


Z 


neither is specified 






O CORDATA=YES 










U RECFORM-FIXUNB, 


V lOROUT=ADDRTR 




(IOROUT=LOAD or 






and RDONLY=YES 










IOROUT=ADD or 


(RPS version of 




ADD) 






P CORDATA=YES 










ADDRTR 


module) 










S ERREXT=YES and 










Z RECFORMisnot 


X lOROUT=LOAD 










RDONLY=YES 










specified 


(RPS version of 










T ERREXT=YES 










(IOROUT=LOAD 


module) 










Y RDONLY=YES 










or RETRVE) 












Z neither is specified 



DTFCD (Reader) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


0-15 


00-FF 






CCB 


16 


10 



1 
2 
3 
4 

5-7 




^OMR 1 *;^ Omitted 

1=ERROPT 2) ;0= Omitted 

COBOL open; ignore option 

1= GET issued 3 J; 0= GET not issued ^ 

DTF table address constants relocated by 

OPENR 

File association: 

000= READ only 

010= READ/PRINT 4 ) 

101= READ/PUNCH/PRINT 5 > 

001= READ/PUNCH 5 ) 


17-19 


11-13 






Address of logic module 


20 


14 




X'02' 
X'05' 


DTF type 

DTF type for 2560 or 5425 


21 


15 




1 
2 
3 
4 
5 
6 
7 




1= Open; 0= Closed 

First time switch 

1=1442 or 2596; 0= Other 

1= 2560, 3525 or 5425; 0= Other 

1=3504, 3505; 0= Other 

1= 2 I/O areas; 0= 1 I/O area 

1= 2520; 0= Other 

1= 2540; 0= Other 


22 


16 




B'SSFOXOIO' 
B'HOBOOOIO' 


Normal command code (not for 

2560 or 5425): 

SS: 00= pocket 1; 01= pocket 2; 

10= pocket 3 6> 
F : 1= Column binary 3 ) ; 0= EBCDIC 
X: 1= OMRor RCE ^; 0= neither 

Read command code (2560, 5425): 

H : 0= hopper 1; 1= hopper 2 

B : 0= EBCDIC; 1= column binary 


23 


17 




B'HOBOOOIO' 


Control command code (not for 2560 

or 5425) 

Read command code (2560, 5425) 


24-27 


18-1 B 






Address of IOAREA2 


28 


1C 



1 
2-7 




1= 2560; 0= Other 
1= 5425; 0= Other 
Not used 


29-31 


1D-1F 






Address of EOF routine 


32-39 


20-27 






Read CCW 


Byres 40-4 


7 as used for a 


1 files except 2560 c 


nd 5425 files 


40-43 


28 -2 B 




LA &IOREG,0(14) 
NOP 


Load user pointer register 


44-47 


2C-2F 




MVC 0(&BLKSIZE, 
13), 0(1 4) 
NOP 
DC X'OOOO' 


Move lOAREAtoWORKA 



DTFCD (Reader) (....Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


The folic 


wing bytes (48-55) are added for 3504, 3505, and 3525 associated files 


48-51 


30-33 




DC A(name) 
B 16(15) 
B 20(15) 
DC F'0' 


If ERROPT= name*2 
If ERROPT= SKIP 
If ERROPT= IGNORE 
If ERROPT= omitted 


52-55 


34-37 




DC A(ASCCFLE) 


Address of associated DTF table * 7 
(3525 only) 


Bytes 40 


onward as used for 2560 and 5425 files 


40-47 


28-2F 






Stacker select CCW 


48-51 


30-33 




LA &IOREG,0(14) 
NOPR 




52-57 


34-39 




MVC 0(&BLKSIZE 
,13),0(14) 
NOP 
DC X'0000' 


Move IOAREA to WORKA 


58-63 


3A-3F 




CLC0(1,14),64(1) 


Test for end-of-file: 
L= 4 if MODE= C 
L= 2 in other cases 


64-67 


40-43 




DC C'/*' 

DC X'0C001022' 


End-of-file indicator if MODE= E 
In other cases 


68-71 


44-47 




DC A(name) 
B 16815 
B 20(15) 
DC F'0' 


If ERROPT= name 
If ERROPT= SKIP 
If ERROPT= IGNORE 
If ERROPT= omitted 


The folio 


wing bytes are added for 2560 or 5425 associated files 


72-75 


48-4B 




DC A(ASOCFLE) 


Address of associated DTF table 


76-81 


4C-51 




MVC 0(&BLKSIZE 
,14),82(1) 


Move card image to IOAREA1 


82 


52 




DC &BLKSIZE C ' 


Buffer for card image 



1) OMR only for 3504, 3505 

2) ERROPT for 3504, 3505, 3525, 2560 or 5425 READ file 

3) 3504, 3505 and 3525 with or without CONTROL=YES specified 

4) 2560, 3525 or 5425 with or without CONTROL=YES specified 

5) 2560,3525 or 5425 without CONTROL=YES specified 

6) Defaults to pocket 2 for 3504, 3505 and 3525 

7) Present only when 2560/3525/5425 associated files are specified for the input DTF 



Bytes 


Bit? 


Contents 


Function 


Dec 


Hex 


0-15 


00-FF 






CCB 


16 


10 




1 
2 




Not used 

1= ERROPT 3) ; 0= Omitted 

COBOL open; ignore option 

1= PUT issued 2 >; 0= PUT not issued 






3 








4 




DTF table address constants relocated 
by OPENR 






5-7 




File Association: 

000= PUNCH only 

011= PUNCH/PRINT 3) 

001=READ/1 5 UNCH 3 ) 

101= READ/PUNCH/PRINT 3 ) 

100= PUNCH/INTERPRET 3 ) 


17-19 


11-13 






Address of logic module 


20 


14 




X'04' 


DTF type 


21 


15 



1 
2 
3 

4 
5 
6 

7 




1= Open; 0= Closed 

First time switch 

1=CTLCHR 

1= Fixed unblocked 

1= Variable unblocked 

1= 2 I/O areas 

1= Workarea 

1= 2 CCWs in table; 0= 1 CCW in table 


22 


16 




B'SSFOOOOT 
B'HSSSOOIT 


Normal command code: 

SS : 00= pocket 1; 01= pocket 2; 

10= pocket 3 4 ) 
F : 1= column binary; 0= EBCDIC 

Normal stacker select command code 
(2560 or 5425) . 
H : 0= hopper 1 ; 1 = hopper 2 
5SS: stacker information 


23 


17 




B'HSSSOOir 


Control command code (not for 2560 
or 5425). 

Actual stacker select command code 
(2560 or 5425) 


24-27 


18-1B 




DC A(IOAREAl+x) 


Address of data in IOAREA1 


28-31 


1C-1F 






Bucket ] ) 


32-33 


20-21 




LR12,(RECSIZE) 


Undefined records only 


34-37 


22-25 




LA&IOREG,4(14) 
NOPR 


Load user pointer register 


38 


26 


0-2 
3 
4 
5 
6 
7 




Not used 

1=5425 

1=2560 

1=3525 

1=1442 or 2596 

1=2520B1 


39 


27 




DCC ' 


Blank for eject last card 



DTFCD (Punch) (... .Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec | Hex 


For all files except 2560 and 5425 files: 


40-47 


28-2F 






Punch CCW 


48-55 


30-37 






Eject CCW for last card if 2520 


For 2540 files if CRDERR is specified 


48-55 


30-37 






Retry CCW 


56-135 


38-87 




DC CL80' ' 


Savearea card image 


For 3525 PUNCH/INTERPRET files 


48-55 


30-37 






Load CCW 


56-63 


38-3F 






Print CCW 


64-127 


40-7F 




DC 64C ' 


Print buffer 


For 3525 Associated files 


48-51 | 30-33 | | DC A(ASOCFLE) 


Pointer to associated file 


For 2560 and 5425 files 


40-47 


28-2F 




DC D'0' 


Eject CCW 
lfFUNC=RPorRPW 


48-55 


30-37 






Stacker select CCW 


56-63 


38-3F 






Punch and Feed CCW 


For 2560 PUNCH/INTERPRET files 


64-71 


40-47 






Load print head buffer 1 CCW 


72-79 


48-4F 






Load print head buffer 2 CCW 


80-87 


50-57 






Print CCW 


88-151 


58-97 




DC 64C ' 


Save area for printing line 2 


For 5425 PUNCH/INTERPRET files 


64-71 | 40-47 | | 


Print CCW 


For 2560 and 5425 Associated files 


64-67 


40-43 




DC A(ASOCFLE) 




68 


44 




DCC ' 
DC X'00' 


If mode is EBCDIC 

If mode is Column Binary 


69- 


45- 




DC&BLKSIZE.C ' 


Buffer for card image 



1) The bucket bytes handle undefined length records 

2) Valid for 2560 or 3525 READ/PUNCH, PUNCH/PRINT, and READ/PUNCH/PRINT files 

3) Valid for 2560 or 3525 only . (3504, 3505, 5425) non- associated files 

4) Defaults to pocket 2 for 3525 



DTFCD (Combined Reader/Punch) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 


16 


10 


0-1 

2 

3 

4 

5-7 




Not used 

COBOL open; ignore option 

Not used 

OPENR relocates DTF address constants 

Not used 


17-19 


11-13 






Address of logic module 


20 


14 




X'00' 


DTF type 


21 


15 






Command code (X'02 1 for 1442, X'C2' 
for 2520, 2540) 


22 


16 






Command code (X'OT for 1442, X'09' 
for 2520, 2540) 


23 


17 






Command code (X'OT for 1442, X'09' 
for 2520, 2540) 


24-31 


18-1F 






CCW 


32-35 


20-23 






Input area address 


36-39 


24-27 






Output area address 


40-41 


28-29 






Input blocksize 


42-43 


2A-2B 






Ouput blocksize 


44-49 


2C-31 




MVC0(&BLKS, 
13,0(14) 




50-55 


32-37 




MVC (&OUBL, 
14),0(13) 




56-59 


38-3B 






End-of-file address 


60-67 


3C-43 






Save area 


68-73 


44-49 




MVC 1 (&OUBL-1, 
13),0(13) 




74-77 


4A-4D 




MVI0(13),X'40' 




78-79 


4E-4F 






Constant (blanks) 


80-83 


50-53 






Constant address (bytes 78-79) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 


16 


10 



1 

2 
3 
4 
5-7 




1= 2-line printer (3,4) ; 0= Other 

1= ERROPT < 3 ' 4 ); 0= Omitted 

COBOL open; ignore option 

1=3525; 0= Other 

OPENR relocates DTF address constants 

000= PRINT only 

011= PUNCH/PRINT 3 ) 

010= READ/PRINT 3 ) 

101= READ/PUNCH/PRINT 3 ) 


17-19 


11-13 






Address of logic module 


20 


14 




X'08' 
X'07' 


DTF type 

DTF type for 2560 and 5425 


21 


15 



1 

2 
3 
4 
5 
6 
7 




1= Open; 0= Closed 

First time switch 

1= Control character 

1= Fixed unblocked records 

1= Variable unblocked records 

1=2 I/O areas 

1= Workarea 

1= Print overflow channel 9 


For Print 


er and Car 


d Pun 


:h devices 


22 


16 




X'09' 


Normal command code •*> 


23 


17 




XW 


Control command code •*) 


24-27 


18-1B 




DC A(IOAREAl-b<) 


Address of data in IOAREA1 


28-31 


1C-1F 






Bucket 1) 


32-33 


20-21 




LR 12,(RECSIZE) 
NOPR0 


For undefined records only 


34-37 


22-25 




LA &IOREG,4(14) 
NOP0 


Only if IOREG= (r) 


38-39 


26-27 






Bucket 2) 


40-47 


28-2F 




11,*,X'60M 

9,lOAREA,X'20', 

121 


CCW- Set up Selective Tape List Control 
STLIST not specified 6 ) 


48-55 


30-37 




9,IOAREA,X , 20', 
121 

A (Name) 

DCA(ASOCFLE) 


CCW- STLIST specified 6 ) 

Address of user error routine (321 1 only) 
If ASOCFLE= filename 3 ) 


For the 2 


560 and 5 


125 M. 


jlti Function Card Machine 


22 


16 




X'00' 


Not used 


23 


17 




B'HHHHHHOO" 


Print head selection byte 

H= 1 specifies the corresponding head 


24-27 


18-1B 






Address of IOAREA1 



DTF PR (....Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec | Hex 


For the 2560 Multi 


Funct 


'on Card Machine (Cont'd) 




28-31 


1C-1F 






Bucket 




32-33 


20-21 




LR 12,(RECSIZE) 
NOPR0 


For undefined records only 




34-37 


22-25 




LA &IOREG,4(14) 
NOP0 


Only if IOREG= (r) 




38-39 


26-27 






Number of bytes to be printed by the 
specified print head 


last 


40-43 


28-2B 




DC A(ASOCFLE) 
DCF'0" 


lfFUNC=RW,PWorRPW 
In all other cases 




44 


2C 



1 
3 

4-7 




1=2560 
Not used 

1= Print control switch for 2560 associa- 
ted files 
Not used 


45-47 


2D-2F 




DC 3X'00' 


Reserved for future use 




For 2560 simple fil 


ss 








48-55 


30-37 






Eject CCW 




56-63 


38-3F 






Load print head buffer CCW 




64-71 


40-47 






Print CCW 




For 2560 associatec 


files 








48-55 


30-37 






Load print head buffer CCW 




56-63 


38-3F 






Print CCW 




For 5425 files 


48-55 


30-37 






Print CCW 



1) The bucket bytes handle undefined records. Bit of byte 28 at open time determines 
the mode set of a printer with UCS. If bit 0= 1, the mode is set so that data checks 
occur if an invalid character is printed. Otherwise, mode is set to suppress data checks. 
The use of the UCS parameter determines the setting of this bit. If STLIST= YES, byte 
31 saves the STLIST control byte provided by the PUT macro. 

2) The 2 byte bucket saves print overflow conditions if CTLCHR= ASA. If STLIST=YES, 
byte 38 contains the current STLIST control byte. Byte 39 is set by the PUT macro to 
indicate spacing or skipping. (X'00' no spacing, no skipping; X'01' spacing; 

X'02' skipping). 

3) Valid for 2560, 3525 READ/PRINT, PUNCH/PRINT and READ/PUNCH/PRINT files. 

4) Valid for 3525 PRINT only files. 

5) X'05' for 3525; X'09' for other devices 

6) Valid for 1403 only 



By 


es 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 




CCB 


16 


10 


X'20' 
X'08' 


COBOL open; ignore option 
DTF table address constants relo- 
cated by OPENR 


17-19 


11-13 




Address of logic module: 
GET and PUT logic if TYPEF LE= 
INPUT; PUT logic if TYPEFLE= 
OUTPUT; GET, PUT and PUTR 
logic if TYPEF LE= CMBND 


20 


14 


X'03' 


DTF type 


21-23 


15-17 




For input and output: not used 
For combined: byte 21 contains 
X'OT and bytes 22-23 contain 
INPSIZE 


24-31 


18-1F 


XWJOAREA^X'OO', 
BLKSIZE 


CCW 


End of to 
added if 


ble if RECF 
WORKA is 


ORM= FIXUNB and WORKA not 
specified. 


specified. The following bytes are 


32-35 


20-23 


DCA(IOAREAl) 


Address of I/O area 


36-39 


24-27 


DCF'0' 


Register save area 


40-43 


28-2B 


DCF'0' 


Register save area 


.End of ta 


ble if RECF 


ORM= FIXUNB. The following t 


ytes are added if RECFORM=UNDEF 






DCF'0' 


Register save area 






DCF'0 1 

DC H'BLKSIZE' 

DCAL2(BLKSIZE-1) 


Register save area 

I/O area size 

For input files only 


The folio 


wing bytes 


are added to the table if TYPEF 


.E= CMBND 


32-35 


20-23 


DC A(IOAREAH-BLKSIZE) 


I/O area address for input 


36-37 


24-25 


DC H'BLKSIZE 1 


Blocksize 



Byf 


es 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 




16 


10 


0-1 




Not used 








2 
3 
4 
5-7 




COBOL open; ignore option 

Not used 

OPENR relocates DTF table addresses 

Not used 


17-19 


11-13 






Address of logic module 




20 


14 




X'CO' 


DTF type 




21 


15 




1 

2-5 

6 

7 


BT 
B'0000' 
BT 
B'0' 


PIOCS switches: 
1= open; 0= closed 
Input 
Not used 
Device is 3886 
Not used 




22 


16 






Error indicator byte 




23 


17 


0-4 
5 
6 
7 


B'00000' 


LIOCS switches: 

Not used 

1= SETDEV 

1= Control passed to COREXIT 

1= FR loaded from disk 




24-31 


18-1F 






FR phasename at open time 




32-39 


20-27 






Phasename of currently used FR 




40-43 


28-2B 




X '00000000' 


Not used 




44-47 


2C-2F 






Start address of FR area in DTF 




48-51 


30-33 






Address of four-byte pointer at the 
of the FR area in the DTF 


end 


52-55 


34-37 






EOF routine address 




56-63 


38-3F 






Scan CCW 




64-71 


40-47 






Read CCW 




72-79 


48-4F 






Read CCW 




80-87 


50-57 






Control CCW 




88-95 


58-5F 






Load format record CCW 




96-99 


60-63 






COREXIT routine address 




100-103 


64-67 






IOAREA1 area address 




104-107 


68-6B 






Header area address 




108-111 


6C-6F 






Exit indicator address 




112 


70 






Start of FR area 





Bytes 


Bits 


Function 


Dec 


Hex 


-15 


00-0F 




Dummy CCB 


16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

Not used 

DTF table address constants relocated by OPENR 

Not used 


17-19 


11-13 




Address of logic module 


20 


14 




DTF type, (X'09 1 ) 

DTF type, (X'OA' if HEADER=YES) 


21 


15 




1 

2 
3 
4 
5 
6 
7 


PIOCS switches: 

1= Open; 0= closed 

1= Input 

1= Control 

1= Device is 1287 

1= Header 

Reserved for future use 

1=RDLNE 

Not used 


22 


16 




Not used 


23 


17 


0-6 

7 


Not used 

1= LIOCS posts a hopper empty condition to DTF 


24-39 


18-27 




CCB 


40-47 


28-2F 




Sense CCW 


48-51 


30-33 




Lost lines (equipment check) 


52-55 


34-37 




After 9 retries for journal tape, or after 2 retries for documents 


56-59 


38-3B 




Wrong length records 


60-63 


3C-3F 




After 4 retries for journal tape, or after 2 retries for documents 


64-67 


40-43 




Keyboard corrections 


68-71 


44-47 




Count of data check errors 


72-75 


48-4B 




Lines marked 


76-79 


4C-4F 




Total lines read (CCW chains executed) 


80 


50 




1 
2 
3 
4 
5 
6 
7 


Error indicators: 

l=EOP 

1= Lost reference mark indicator 

1= Late stacker selection 

1= Non-recovery error 

1= Equipment check 

1 = Wrong length record 

1= Hopper empty 

1= Data check 


81 


51 




1 


LIOCS switches: 
1= First time 
1=2 I/O areas 



DTFOR (....Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


81 
(Cont'd) 




2 
3 
4 
5-7 


l = WORKA=YES 
l=RECFORM=F!XUNB 
l = RECFORM=UNDEF 
Not used 




82 


52 




Normal command code 




83 


53 




Control command code 




84-87 


54-57 




IOAREA2 address 




88-95 


58- 5F 




Read CCW 




96-103 


60-67 




Go to next line CCW 




104-111 


68-6F 




Control CCW 




112-115 


70-73 




EOF address 




116-119 


74-77 




Correction exit address 




120-123 


78-7B 




IOAREA1 address 




124-127 


7C-7F 




DCA(&BLKS-1) 




128-129 


80-81 




SR 13,&RECS 




130-131 


82-83 




LR &RECS,13 




132-133 


84-85 




LR &IOR, 13 




134-135 


86-87 




Sense 





Bytes 


Bits 


• 




Dec 


Hex 




-5 


00-05 




CCB indicators 


6 -7 


06-07 




Logical class and unit numbers (primary if DUAL addressing) 


8 


08 




Zero 


9 -11 


09-0B 




CCW address 


12-15 


0C-0F 




Zeros 


16 
17-19 


10 
11-13 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

Not used 

DTF table address conctants relocated by OPENR 

Not used 

Address of logic module 


20 


14 




DTF type= X'OB* 


21 


15 



1 
2 
3 
4 
5 
6 
7 


Logic module option switches: 

User disengage 0= off 

Program sort mode 0= no 

First time switch (after engage) 0= no 

Addressing= DUAL 0= no 

Waiting 0=no 

Read logic indicator 0= no 

Not used 

Supervisor initial read (after open) 0= no 


l=on 
l=yes 
1= yes 
l=yes 
l=yes 
l=yes 

l=yes 


22-29 


16-1D 




Symbolic filename 


30 


IE 





Open/Close switch: 
0= closed; l = open 


31-33 


1F-21 




Open/Close option switches 


34-35 


22-23 




Logic module option switches 


36-39 


24-27 




Error information status 


40-41 


28-29 




Length of DTF table 


42-43 


2A-2B 




Device type indicator 


44-45 


2C-2D 




Record type 


46-49 


2E-31 




Reserved for future use 


50-51 


32-33 




I/O register 


52-55 


34-37 




End-of-file address 


56-59 


38-3B 




IOAREA2/1 address 


60-63 


3C-3F 




Document buffer size 


64-65 


40-41 




Blocking factor/Number of buffers 


66-67 


42-43 




I/O area size 


68-71 


44-47 




Record length 


72-76 


48-4C 




Sense information 



DTFMR (....Cont'd) 



By 
Dec 


es 
Hex 


Bits 


Function 


77 


4D 




Supervisor switch 


78-79 


4E-4F 




Logical class and unit numbers (secondary, for DUAL 
addressing only) 


80-81 


50-51 




Register alignment bytes 


82-83 


52-53 




Logical class and unit numbers (primary, for DUAL 
addressing) 


84-87 


54-57 




Document buffer size 


88 


58 




Command code (4C) 


89-91 


59-5B 




Address of last byte of first document buffer 


92 


5C 




Command code (4C) 


93-95 


5D-5F 




Address of last byte of last document buffer 


96-99 


60-63 




Stacker select routine address 


100-103 


64-67 




Address of stacker select CCW chain 


104-107 


68-6B 




Current buffer address pointer (Supervisor) 


108-111 


6C-6F 




Supervisor count 


112-113 


70-71 




Number of buffers minus 7 


114-115 


72-73 




Message indicator 


116-119 


74-77 




ERROPT routine address 


120-121 


78-79 




Logical class and unit numbers (secondary, for DUAL 
addressing only) 


122-123 


7A-7B 




Reserved for future use 


124-127 


7C-7F 




Address of last buffer given to user 


128-131 


80-83 




Address of first byte of last buffer 


132-139 


84-8B 




Channel status word (CSW) 


140-143 


8C-8F 




Address of active GET record 


144-147 


90-93 




GET counter 


148-159 


94-9F 




Reserved for future use 


For single addressing 


160-167 


A0-A7 




CCW - Engage 


168-175 


A8-AF 




CCW - Read 


176-183 


B0-B7 




CCW - Sense 


184-191 


B8-BF 




CCW - NOP 


192-199 


C0-C7 




CCW - Stacker select 


200-207 


C8-CF 




CCW - TIC 


208-215 


D0-D7 




CCW - Control 


216-223 


D8-DF 




CCW-BN 



DTFMR (....Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


224-231 
232-239 
240-247 


E0-E7 
E8-EF 
F0-F7 




CCW - Read 
CCW - Sense 
CCW - Disengage 


For DUAL Address Adapter 


160-167 
168-175 
176-183 
184-191 
192-199 
200-207 
208-215 
216-223 
224-231 
232-239 
240-247 
248-255 
256-263 


A0-A7 
A8-AF 
B0-B7 
B8-BF 
C0-C7 
C8-CF 
D0-D7 
D8-DF 
E0-E7 
E8-EF 
F0-F7 
F8-FF 
100-107 




CCW - Engage 
CCW - Read buffer 1 
CCW - Sense 
CCW - NOP 
CCW - Read buffer 2 
CCW - MOD Sense 
CCW - Read buffer 1 
CCW - MOD Sense 
CCW -TIC to NOP 
CCW - NOP 
CCW - MOD CTL 
CCW - Stacker select 
CCV/ - MOD Sense 



DTFMT (Data Files 



Bytes 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


-15 


00-0F 






CCB 




8 


08 




Input: X'00'- 

X'63' 
Output: X'00'- 

X'04' 
(variable) 
X'OO' (undefined 


Buffer offset length, ASCII 
) 




16 


10 




1 
2 
3 
4 

5 




First time entered MTMOD for a 
file 

Not used 

COBOL open; ignore option 
American National Standard COBOL 
DTF table address constants reloca- 
ted by OPENR 
1- spanned records 








6 




1= ASCII -0= EBCDIC 


V-V,S 






7 




ASCII input: 1= Length check 
ASCII output: 1= Buffer offset length 
length=4 


V 
V 


17-19 


11-13 






Address of logic module 




20 


14 




X'll' 
X'12* 
X'13' 
X'14' 


Nonstandard or unlabeled 
Standard labeled, output 
Standard labeled, input, backwards 
Standard labeled, input, forwards 




21 


15 




1 
2 




First time switch: 
l=not first-time entry 
0= first-time entry 
1= blocked 
0= unblocked 
1=2 I/O area's 
0= 1 I/O area 








3 




1= workarea 

0= no workarea 

0= workarea, spanned 


F,U,V 
F,U,V 
S 






4 




1= input 
0= output 








5 




1= backwards 
0= forwards 








6 




1= checkpoint 
0= no checkpoint 








7 




1=TRUNC required during Close 




22-29 


16-1D 






Symbolic filename 




30 


IE 






Same as command code in CCW; 
(X'01', X'02'or X'OO) 




31 


IF 


0-4 




Bits 0-4 are used as displacements by 
OPEN to determine the location of 
variable fields of the DTF. 





DTFMT (Data Files) (....Cont'd) 



By 


es 


Bits 


Contents * 


Fu „c„on 


Record 
Format 


Dec 


Hex 


31 


IF 




B'01110' 


Input 


F 


(Cont'd) 






B '01 100' 


Output 


F 








B'looor 


Input 


V 








B'oinr 


Output 


V 








B'onor 


Input 


U 








B'oioir 


Output 


u 






5 




l=Tape label information included 
in DTF (see bytes 88-95) 
0=Tape label information not inclu- 
ded in DTF 








6 




Used by COBOL 








7 




1= Header label and EOV informafior 
wanted 

0= No header label and EOV infor- 
mation wanted 




32 


20 



1 
2 
3 

4 

5 
6 

7 




Standard labels: l=yes; 0= no 

Labels: 1= nonstandard; 0= unlabeled 

Rewind unload: l-yes;0=no 

Rewind option: 1= no rewind; 

0= rewind 

Drive direction: 1= backwards; 

0= forwards 

User label address: l=yes; 0=no 

Tapemark option: I=no; 0= yes 

EOF-EOV switch (used by IBM 

SORT): l=yes; 0=no 




33-35 


21-23 






User label routine address 




36 


24 



1 
2 
3 
4 

5 




DTFPH: l=yes;0=no 

COBOL indicator: 1= yes; 0= no 

File type: 1= input; 0= output 

FEOV switch: l=yes;0=no 

EOF-EOV switch (output): 1= EOF 

0=EOV 

Open indicator: l=open; 0= closed 








6 




1= variable or spanned records 


v,s 






7 




1= undefined records 


u 


37-39 


25-27 






EOF address 




40-43 


28-2B 






Block count 




44-47* 


2C-2F 




BXH 11,12, 
24(15) 


Forward 


F 








BXLE 11,12 


Backward 


F 








24(15) 












L &VARBLD, 


If VARBLD parameter is used 


V 








DEB LOCKER 












NOP 0(0) 




S 








DCF'0* 


DEBLOCKER1 


u 



DTFMT (Para Files) ( Cont'd) 



Byi 


es 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


48-51 


30-33 




LA 14,1(14) 




F,V,S 








BCTR 14,0 + 


Backward 


F,V,S 








NOPRO 












L &RECSIZE, 


If RECSIZE given 


U 








DEB LOCKER 1 












NOP 0(0) 


For input if not NOP 


U 


52-55 


34-37 




L &IOREG, 
DEBLOCKER1 


If IOREG specified 


F 








L &IOREG, 


If IOREG specified 


V 








DEBLOCKER5 












L EIOREG, 


If IOREG specified 


U 








DEBLOCKER2 












NOP 0(0) 


If no IOREG 










L &RECSIZE, 


If spanned input 


S 








IJFVSREC 












ST &RECSIZE, 


If spanned output 


S 








IJFVSREC 






56-63 


38-3F 






CCW 




64-67 


40-43 




DC A(IOAREAl) 
DC A(IOAREAl 
+BLKSIZE-1) 
DC A(IOAREA2) 
DC A(IOAREA2 
+BLKSIZE-1) 


One I/O area 

One I/O area, read backward 

Two I/O area 's 

Two I/O area's, read backward 




68-71 


44-47 




DCF'0' 


Input 


F 








DC A(IOAREAl 


Input backward: DEBLOCKER1 


F 








+BLKSIZE- 












RECSIZE) 












DCA(IOAREAl) 


1 I/O area, output: DEBLOCKER1 


F 








DC A(IOAREA2) 


2 I/O area's, output: DEBLOCKER1 


F 








DCA(BLKSIZE) 


DEBLOCKER1: EBCDIC 


V,S 








DCA(IOAREAl) 


1 I/O area: DEB LOCK ER2 


u 








DC A(IOAREA2) 


2 I/O area's: DEB LOCK ER2 


u 


72-75 


48-4B 




DC F 'RECSIZE' 


Forward: DEBLOCKER2 


F 








DCF'-RECSIZE' 


Backward: DEBLOCKER2 


F 








DCA(IOAREAl) 


1 I/O area: DEBLOCKER2 


V,S 








DC A(IOAREA2) 


2 I/O area's: DEBLOCKER2 


V,S 








LA 14,1(14) 


Forward 


U 








BCTR 14,0 + 


Backward 


U 








NOPRO 






76-79 


4C-4F 




DCF'0' 


Input forward: DEBLOCKER3 


F 








DC A(IOAREAl 


Input backwards: DEBLOCKER3 


F 








+BLKSIZE - 












RECSIZE) 












DC A(IOAREAl 


Output, 1 I/O area: DEBLOCKER3 


F 








+BLKSIZE-1) 












DC A(IOAREA2 


Output, 2 I/O area's: DEBLOCKER3 


F 








+BLKSIZE-1) 







DTFMT (Data Files) 



Bytes 


Bits 


Contents 


K™*» 


Format 


Dec 


Hex 


76-79 






DCF'O' 


DEBLOCKER3 


v,s 


(Cont'd) 






DCY(BLKSIZE) 


(Bytes 76-77 only) 


U 








DC Y(BLKSIZE 
-1) 


(Bytes 78-79 only) 


U 


80-83 


50-53 




DC Y(BLKSIZE) 
+ Y(BLKS!ZE-1) 


Forward 


F 








DC &(BLKSIZE) 


Backward 


F 








+Y(BLKSIZE+1) 












DCF'O 1 


DEBLOCKER4 


V,S 








LR 12,RECSIZE 


(Bytes 80-81 only) 


U 








DC H'O' 


(Bytes 82-83 only) 


U 


84-87 


54-57 




DC Y(RECSIZE 

-1) 

DC2X , 00' 


(Bytes 84-85) 


F 








(Bytes 86-87) Output, Standard labels 


F 








DC A(IOAREAl 


1 I/O area: DEBLOCKER 5, EBCDIC 


V,S 








+4) 












DC A(IOAREA2 


2 I/O area's: DEBLOCKER5, EBCDIC 


V,S 








+4) 












DC A(I0AREA1 


1 I/O area: DEBLOCKER5, ASCII 


V 








+BUFOFF) 












DCA(IOAREA2 


2 I/O area's: DEBLOCKER5, ASCII 


V 








+BUFOFF) 












DC 2X'00' 


(Bytes 84-85 output only) 
Standard labels; reserved for OPEN 


F,U 








B 28(15) 


Input only, ERROPT= omitted 


U 








B 24(15) 


Input only, ERROPT= SKIP 


U 








B 28(15) 


Input only, ERROPT= IGNORE 


U 








DC A(ERROPT) 


Input only, ERROPT= ADDRESS 


U 


88-91 


58-5B 




DC A(WLRERR) 
B 24(15) 

B 28(15) 


Input only, WLRERR= ADDRESS 

Input only, WLRERR omitted and 

ERROPT=SKIP 

Input only, WLRERR omitted and 

ERROPT= IGNORE or omitted 










DC 2X'00' 


Output only, standard labels (bytes 
88-89), reserved for OPEN 


J 








DC A(ERROPT) 


Input only, WLRERR omitted and 
ERROPT= ADDRESS 


1 


90-95 


5A-5F 




DC 6X'00' 


File serial number, Standard labels, 
Output only 


I 


92-95 


5C-5F 




DC A(ERROPT) 


Input only, ERROPT= ADDRESS 
Output, nonstandard labels only. 
ERROPT= ADDRESS 


s. 








B 28(15) 


Input only, ERROPT= omitted 


§ 








B 24(15) 


Input only, ERROPT= SKIP 


«<" 








B 28(15) 


Input only, ERROPT= IGNORE 




96-99 


60-63 




DC 4X'00' 


Volume sequence number, Standard 
labels, output only 




96-97 


60-61 




DC 2X'00' 


Standard labels, input only, reservec 
for OPEN 





DTFMT (Data Files) ( Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record 


Dec 


Hex 


98-103 


62-67 




DC 6X , 00" 


File serial number, Standard labels, 
Input only. 





100-103 


64-67 




DC 4X'00' 


File sequence number, Standard 
labels, output only 


?■ 


104-107 


68-6B 




DC 4X'00' 
DC A(ERROPT) 


Volume sequence number, Standard 
labels, input only 
Output only, Standard labels only. 
ERROPT= ADDRESS 


3. 


108-111 


6C-6F 




DC4X'00' 


File sequence number, Standard 
label, input only 


2. 


88-91 


58-5B 




DCF'O' 


DEBLOCKER6 




92-95 


5C-5F 




DC A(ERROPT) 


Output only, Nonstandard labels 
only. ERROFT= ADDRESS 




92-93 


5C-5D 




DCY(BLKSIZE) 

DCY(BLKSIZE 

-4) 

DC Y(BLKSIZE 

-BUFOFF) 


Input only 

Output only: EBCDIC 

Output only: ASCII 


(Vonly) 


94-95 


5E-5F 




DCY(BLKSIZE 

-1) 

DC Y(RECSIZE 

-1) 

DC H'O' 






96-97 


60-61 






$■ 


98-99 


62-63 




Input only: Residual count 


| 


100-103 


64-67 




DC A(WLRERR) 
B 24(15) 

B 32(15) 


Input only, WLRERR= ADDRESS 

Input only, WLRERR= omitted and 

ERROPT=SKIP 

Input only, WLRERR= omitted and 

ERROPT= IGNORE or omitted 




100-101 


64-65 




DC 2X'00' 


Output only, Standard labels, reser- 
ved for OPEN 


a 


104-107 


68-6B 




DC A(ERROPT) 
B 28(15) 
B 24(15) 
B 28(15) 
DC A(ERROPT) 


Input only, ERROPT= ADDRESS 
Input only, ERROPT= omitted 
Input only, ERROPT= SKIP 
Input only, ERROPT= IGNORE 
Output, Nonstandard labels only 
(version 3 onward); ERROPT=ADDRES 


S 


108-111 


6C-6F 




DC 4X'00' 


Volume sequence number; Standard 
labels, output only 




108-109 


6C-6D 




DC 2X'00' 


Standard labels, input only; Reservec 
for OPEN 




110-115 


6E-73 




DC 6XW 


File serial number; Standard labels, 
input only 




112-115 


70-73 




DC 4X , 00' 


File sequence number; Standard labe 
output only 


; ' 



DTFMT (Data Files) ( Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


116-119 


74-77 




DC A(ERROPT) 


Output only, ERROPT= ADDRESS, 
Standard labels only 


§.; 


116-119 


74-77 




DC4X'00' 


Volume sequence number; Standard 
labels, input only 


II 


121-123 


78-7B 




DC 4X'00 1 


File sequence number; Standard 
labels, input only 


11 

S. 5- 


86-91 


56-5B 




DC 6X'00' 


File serial number; Standard labels, 




88-91 


58-5B 




DC A(WLRERR) 
B 24(15) 

B 28(15) 

DC A(ERROPT) 


output only 

Input only; WLRERR= ADDRESS 

Input only; WLRERR= omitted and 

ERROPT=SKIP 

Input only; WLRERR= omitted and 

ERROPT= IGNORE or omitted 

Input only; WLRERR= omitted and 

ERROPT= ADDRESS. Output only; 

nonstandard labels, ERROPT=ADDRE 


;s 


92-95 


5C-5F 




DC4X'00' 


Volume sequence number; Standard 
labels, output only 


§_ 


92-93 


5C-5D 




DC 2X'00' 


Standard labels; input only, Reserved 
for OPEN 


Q. 


94-99 


5E-63 




DC 6X'00' 


File serial number; Standard labels, 
input only 


n 


96-99 


60-63 




DC 4X'0O' 


File sequence number; Standard 
labels, output only 


i. 


100-103 


64-67 




DC4X'00' 


Volume sequence number; Standard 
labels, input only 




100-103 


64-67 




DC A(ERROPT) 


Output only; Standard labels only, 
ERROPT= ADDRESS 




100-103 


64-67 




DC 4X , 00' 


Volume sequence number; Standard 
labels, output only 




104-107 


68-6B 




DC4X'0O' 


File sequence number; Standard 
labels, input only 




100-103 


64-67 




DC A(WLRERR) 
B 24(15) 

B 32(15) 


Input only; WLRERR= ADDRESS 
Input only; WLRERR= omitted and 
ERROPT= SKIP 

Input only; WLRERR= omitted and 
ERROPT= IGNORE or omitted 


■s 


100-101 


64-65 




DC 2X'00' 


Output only; Standard labels, 
reserved for OPEN 


^~ 


102-107 


66-6B 




File serial 
number 


Standard labels, output only 


O 


100-103 


64-67 




DC 4X , 00 I 


Output only; ERROPT= ADDRESS 
Nonstandard labels only 


"^ 



DTFMT (Data Files) (....Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


100-123 


64-7B 




DC 24XW 


Output only; ERROPT= omitted, 
nonstandard labels 




104-107 


68-6B 




DC A(ERROPT) 
B 24(15) 
B 24(15) 
B 28(15) 


Input only; ERROPT= ADDRESS 
Input only; ERROPT= omitted 
Input only; ERROPT= SKIP 
Input only; ERROPT= IGNORE 




104-107 


68-6B 




DC A(ERROPT) 


Output only; ERROPT= ADDRESS, 
nonstandard labels 




108-123 


6C-7B 




DC 16X'00' 


Output only; ERROPT= ADDRESS , 
nonstandard labels 




108-111 


6C-6F 




Volume sequen- 
ce number 


Standard labels, output only 




112-115 


70-73 




File sequence 
number 


Standard labels, output only 




116-119 


74-77 




DC A(ERROPT) 


Output only, ERROPT= ADDRESS, 
standard labels 




120-123 


78-7B 




DC 4X'00' 


Output only, ERROPT= ADDRESS, 
standard labels 


7 


108-123 


6C-7B 




DC 16X'00' 


Input only, nonstandard labels 


~a 


108-109 


6C-6D 




DC 2X'00' 


Standard labels, input only, reserved 
for OPEN 


a. 


110-115 


6E-73 




File serial 
number 


Standard labels, input only 


3. 


116-119 


74-77 




Volume sequen- 
ce number 


Standard labels, input only 


"^ 


120-123 


78-7B 




File sequence 
number 


Standard labels, input only 




124-127 


7C-7F 




DCF'0 1 


Full word for loading and storing 
USER RECSIZE: IJFVSREC 




128 


80 



I 

2 
3 
4 
5 

6 

7 


DC X'00' 


IJFVSFLG 
Sign bit, not used 
Skip to first segment 
First segment 

Segment out of sequence, input only 
Read back for EOV, output only 
File reversed for logical spacing; 
Input CNTRL only; Trunc issued, out- 
put only 

User Trunc issued, output only 
Multi segment, output only; Skip Ge 
segment, input CNTRL only 




129-131 


81-83 




DC 3X'00' 


Pointer within WORKA 





See Notes on next page 



DTFMT (Data Files) (....Cont'd) 



* The format of the tape data file DTF is different starting at byte 44. 

The location indicated by the numbers in the left hand column can contain only 
one of the factors listed under Contents . 

The factor used for any given DTF table is determined by whether the file record 
format is fixed, variable or undefined, and by other DTF parameters as indicated. 
A blank in the record column indicates that the contents apply to all record types. 

• Record Format explanation 

F = Fixed Record 

V = Variable 

U = Undefined 

S = Spanned (variable format superset) 

The deblockers are scratch areas used by the modules to save data from one GET/ 
PUT macro instruction to another. In the text and listings, they are referred to by 
the names DEBLOCKER1 to 6. These are not^ labels; they are comments used to 
make it easier to follow the listings. 



DTFMT (Workfiles) 



Byl 


es 


Bits 


Function 


Dec 


Hex 


-15 


00-0F 




CCB 


16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

1= VOL1 label is at user specified density 

1= DTF table address constants relocated by OPENR 

Not used 


17-19 


11-13 




Address of logic module 


20 


14 




DTF type=X'10' 


21 


15 



1 
2 
3 
4 
5 
6 
7 


1= No rewind 

1= Rewind unload 

l=Workfile 

1 = Read backward 

1 = Write 

l=PO!NTW 

Not used 

1 = Forward-space file before next operation 


22-23 


16-17 




Not used 


24-25 


18-19 




Record length 


26-27 


1A-1B 




Maximum BLKSIZE 


28 


1C 




Read command code (X'02 1 for read forward; X'OC for read 
backward) 


29-31 


1D-1F 




EOF address 


32-39 


20-27 




CCW 


40-43 


28-2B 




Block count, initialized 00000000 for read forward, 00400000 
for read backward 


44 


2C 



1 
2 
3 
4-7 


1= Error routine 

1= Ignore 

Not used 

1= Record fixed unblocked 

Not used 


45-47 


2D-2F 




DC A(ERROFT) Address of error routine 



DTFSD (Data Files) 



DTF Assembly 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 


&Filename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 



1 

2 
3 
4 
5 

6 

7 


1= Dequeue old volume extents 

1= Dummy OPEN to obtain extents from label track 

1= File assigned '1GN' (COBOL) 

1= Track hold option specified 

1=DTF relocated by OPENR 

1= Input trailer labels to be processed at close time 

(COBOL only) 
1= Spanned processing 
1= COBOL end-of-extent option specified 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type for OPEN/CLOSE (X'20'= sequential 
access DASD files) 




21 


15 




1 
2 
3 
4 
5 
6 
7 


1=2321 (version 1/2 only) 

1= Blocked file 

1 = Work file 

l=Workarea specified 

1= Not a Version 1 type table 

1= Open; 0= closed 

1= Input; 0= output 

1= User labels specified 




22-28 


16-1C 




Filename (DTF name) 




29 


ID 




Device type code: 

X'00^2311 Note: 

X'01'= 2314,2319 In previous versions, last 

X'02'= 2321 byte of filename contains 

X'04'= 3330 device type code 

X'08'=3340 general 

X'09'=3340 35MB 

X'0A'=3340 70MB 




30-35 


1E-23 




Address of Format 1 label in VTOC (BCCHHR) 




36-37 


24-25 




Volume sequence number 




38 


26 




1 

2 
3 
4 
5 
6 
7 


1 

2 
3 
4 
5 


Open communication byte: 
Input file 

1= No more extents 

1= Update file 

1= Process trailer labels 

1= Exit to user's EOF routine 

1= Next extent on new volume 

1= Return to close routine 

1= Process header labels 

1= Extent switch 

Output file 

l=No more extents 

1= Extents needed at close time 

1= Process trailer labels 

1= Process header labels 

1= Next extent on new volume 

1= Extents entered via console 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




38 






Output file (Cont'd) 




(Cont'd) 


6 


1= Process trailer labels at close 








7 


1= Check extent for minimum of 2 tracks 




39 


27 




1 
0-7 


1= Extent bypassed before file is opened (input 

only) 

1= FEOVD has been issued (input only) 

Sequence number of current extent opened 

(Output only) 




40 


28 




Sequence number of last extent opened 




41-43 


29-2B 




Address of user's label routine 




44 


2C 



1 

2-6 

7 


not used 

1= Device supports RPS 

not used 

1= DTF has been extended into the partition 

virtual area 




45-47 


2D-2F 




Address of IOAREA1 




48-51 


30-33 




CCHH address of user's label track (X'80000000') 




52-53 


34-35 




Lower head limit (HH) 




54-57 


36-39 




Extent upper limit (CCHH) „- 


&Filename.S 


58-59 


3A-3B 




Seek address (BB) : 

X'OOOO' if a disk device 

X'OOnn' if 2321; where nn= bin number 




60-63 


3C-3F 




Search argument (CCHH) 




64 


40 




Record number 




65-67 


41-43 




EOF address if input file ; Key length and data 
length if output file 




68-71 


44-47 




CCHH control field : 

CCHH= X'00C80009' if 2311 type 1 

CCHH= X'00C80013' if 2314 type 1 or 2319 

CCHH= X01FF0012' if 3330 type 1 

CCHH=X' 13090413' if 2321 type 1 

CCHH= X'00C700nn' if 2311,2314,2319 type 128 

CCHH= X'130904nn' if 2321 type 128 

CCHH= X'OIFFOOnn' if 3330 type 128 

CCHH= X'OIFFOOOB' if 3340 35 MB 

CCHH= X'02B8000B' if 3340 70 MB 

where nn= current upper head number 




72 


48 




Number of records per track (input) or number of 
records per track - minus one (output) 




73 


49 




1 

2 
3 

4 


Switch byte used by the logic modules for various 
switching purposes. Functions indicated are for 
the ON condition(l) of the respective bit. 

Fixed length Record Modules 

Not first entry after Open (INPUT and UPDATE) 

Not first write after Open (OUTPUT) 

Short record (INPUT and UPDATE without 

truncation) 

Partial block written (OUTPUT) 

ERROPT= SKIP (INPUT); TRUNC= YES (OUTPUT) 

End-of-file record written (OUTPUT) 

End of extent (UPDATE) 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


F—ta. 


Dec 


Hex 




73 






Fixed length Record Modules (Cont'd) 




(Cont'd) 




5 
6 

7 



1 

2 

3 
4 
5 

6 

7 


1 
2 
3 
4 
5 
6 
7 


Truncation not specified (used by OPEN routines) 
V/rite block of records (UPDATE) 
End of file (UPDATE) 

Variable length Record Modules 

Not first entry after OPEN (INPUT and UPDATE) 
Write record (OUTPUT) 

Wrong length record (INPUT); TRUNC= YES 
(OUTPUT); Second GET operation performed (UP- 
DATE) 

Return to close routine (OUTPUT) 
Update specified (UPDATE) 
Not first entry after OPEN (OUTPUT) 
New extent required by CLOSE 
Capacity of I/O area exceeded (OUTPUT) 
Second GET required (UPDATE) 
Not first read (INPUT) 
Second GET issued (UPDATE) 
Unnecessary to read (INPUT) 
Track capacity exceeded (OUTPUT) 
Save record count (UPDATE) 

Undefined length Record Modules 

Not first entry after OPEN (ALL modules) 

Save record count (UPDATE) 

Return to close routine (OUTPUT) 

Second GET issued (UPDATE) 

Not used 

PUT command issued (UPDATE) 

End affile reached (UPDATE) 

Multi-track operation (UPDATE) 




74-75 


4A-4B 




Block size minus 1 




76-80 


4C-50 




CCHHR= Extent lower limit and record number. 
Field is used as a search argument bucket by the 
logic modules 




81 


51 


1 


1= FEOVD has been issued (output only) 




81-83 


51-53 




Address of user wrong-length record routine if 
input file; Track capacity counter if output file 




84-87 


54-57 




Instruction to load user's register IOREG. 
(Note: This field is a NOP unless blocked records 
are processed in one I/O area, or two I/O areas 
are specified and records are processed in the 
I/O areas) 




88-91 


58-5B 




Address of current available input/output area 




92-95 


5C-5F 




Logical record size 




96-99 


60-63 




Address of end of input/output area 



DTFSD (Data Files) (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




100 


64 



1 

2 
3 
4 
5 

6 

7 


Logical indicators: 

l=ERROPT= address 

l=ERROPT= IGNORE 

1= ERROPT= SKIP 

1=VERIFY=YES 

1=2 I/O areas 

1=WLRERR= address (fixed length and variable 

records) 
1= Output file (undefined length records) 
1 = Fixed-length records 
0= Variable or undefined length records 
Control parameter specified 




101-103 


. 65-67 




Address of user's read error routine 




104-111 


68-6F 




Seek CCW 




112-119 


70-77 




Search ID Equal CCW 




120-127 


78-7F 




TIC CCW 




128-135 


80-87 




Read/Write Data CCW 



This is the end of the common portior 
added depending on the parameters s 



of the DTFSD table. The following sections are a 
ecified in the operand of the DTFSD macro instructic 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec | Hex 


If RECFORM=FIXBLK and TRUNCS= YES 


3. 

S 




136-143 
144-151 


88-8F 
90-97 




Read count CCW 
Count field input area 


If CONTROL= YES, the following section is added 


152-167 
168-175 


98-A7 
A8-AF 




Control CCB 
Control CCW 


If UPDATE=YES 




136-143 
144-151 
152-159 


88-8F 
90-97 
98-9F 




Search ID Equal CCW 
TIC CCW 
Verify CCW 


If CONTROL= YES, the following section is added 


160-175 
176-183 


A0-AF 
B0-B7 




Control CCB 
Control CCW 


If RECFORM=FIXBLK, TRUNCS= YES and UPDATE=YES 




136-143 
144-151 


88-8F 
90-97 




Read Count CCW 
Search ID Equal CCW 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


FuM ,k» 


Record 
Format 


Dec | Hex 


If RECFORM=FIXBLK, TRUNCS= YES and UPDATE=YES (Cont'd) 


Q. 




152-159 

160-167 
168-175 


98-9F 

A0-A7 
A8-AF 




TIC CCW (Bytes 158-159 contain saved 
block length if two files are using same 
logic module) 

Verify CCW 

Count field input area 


If CONTROL= YES, the following section is added 


176-191 
192-199 


B0-3F 
C0-C7 




Control CCB 
Control CCW 


If TRUNCS or UPDATE are not specified, no additions are made to the DTFSD 
table except when CONTROL= YES is specified, the following section is added. 




136-151 
152-159 


88-97 
98-9F 




Control CCB 
Control CCW 




136-143 
144-151 
152-159 


88-8F 
90-97 
98-9F 




Search ID Equal CCW 
TIC CCW 
Verify CCW 


o 


If CONTROL is not specified 


160-163 


A0-A3 




End-of-extent routine address (primarily 
used by COBOL compiler) 


If CONTROL=YES 


160-175 
176-183 
184-187 


A0-AF 
B0-B7 
B8-BB 




Control CCB 

Control CCW 

End-of extent routine address (primarily 
used by COBOL compiler) 




136-143 


88-8F 




Read count CCW 


^5<: 

1 s-5- 

8.5-h: 

o °- — 
° 3 CO 

= 3.1- 


If UPDATE is not specified: 




144-15l| 90-97 | J Count field input area 


If CONTROL=YES* 


152-167 
168-175 
176-179 
180-183 


98-A7 
A8-AF 
B0-B3 
B4-B7 




Control CCB 
Control CCW 
Logical record length 
RX type instruction 



These bytes are always generated when spanned processing is specified 
111-55 



DTFSD (Data Files) ( Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec | Hex 


If UPDATE is not specified: (Cont'd) 


° 8-°. 

Ill 

O (T 3 

3_<g <9. 

fit i" 




If CONTROL= YES (Cont'd) 


184 


B8 





Not used 








1 

2 
3-7 


1= Skip segment 

1= Spanned first time 

Not used 




185-187 


B9-BB 




Pointer in logical record 


2° 3. 
5 Q -*" 


If UPDATE=YES: 


a. 




144-151 


90-97 




Search ID Equal CCW 




152-159 


98-9F 




TICCCW 


=> 9 




160-167 


A0-A7 




Verify CCW 


if* 1 




168-175 


A8-AF 




Count field input area 


3^1 




176-183 


B0-B7 




Count field save area if one I/O area 


^ 




184-191 


B8-BF 




Count field save area if two I/O areas 


o_ o 
la" 


If CONTROL=YES* 




192-207 


CO-CF 




Control CCB 




208-215 


D0-D7 




Control CCW 






216-219 


D8-DB 




Logical record length 






220-223 


DC-DF 




RX type instruction 






224 


E0 





Not used 










1 
2 
3 
4 
5 
6 
7 


1= Skip segment 

1= Spanned first time 

1= Null segment 

1= Spanned PUT return 

Not used 

Not used 

1= No update 


o El 
3. » 

if 




225-227 


E1-E3 




Pointer in logical record 


8. 




228-235 


E4-EB 




Count save area 






236-239 


EC-EF 




Extent status save area 






136-143 


88-8F 




Search ID Equal CCW 


<: 




144-151 


90-97 




TICCCW 


=■ 




152-159 


98-9F 




Verify CCW 


o o- 
5. » 




160-163 


A0-A3 




Space remaining in output area 


- 3 




164-165 


A4-A5 




Track capacity 


s" Z 




166-169 


A6-A9 




Instruction to load user's register VARBLD 
(If VARBLD is not specified, instruction 
is NO-OP) 


3. 



These bytes are always generated when spanned processing is specified 
111-56 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 




Format 


Dec | Hex 




If CONTROL=YE 


S* 




<: 

a 
c — 


170-172 


AA-AC 




Not used 




173-175 


AD-AF 




End-of-extent routine address (primarily 
used by COBOL compiler) 


II 




176-191 


BO-BF 




Control CCB 






192-199 


C0-C7 




Control CCW 


o 




200-203 


C8-CB 




Logical record length 






204-207 


CC-CF 




RX type instruction 






208 


DO 




1 
2 
3 

4 
5 
6 

7 


Not used 

Not used 

1= Leading segment 

1= Output block truncated 

1= End of track 

1= Track truncated 

1= Save count 

1= Volume spanned 


<: 

re 5" 
8 Z. 

:n"a 




209-211 


D1-D3 




Pointer in logical record 


2L 




212-219 


D4-DB 




Count save area 






220-223 


DC-DF 




Extent status save area 






136-143 


88-8F 




Search ID Equal CCW 






144-151 


90-97 




TIC CCW 


c 

3 




152-159 


98-9F 




Verify CCW 




160-161 


A0-A1 




Track capacity 


"c °~ 


If CONTROL=YES 


162-164 


A2-A4 




Not used 




164-167 


A4-A7 




End-of-extent routine address (primarily 
used by COBOL compiler) 


\ 




168-183 


A8-B7 




Control CCB 






184-191 


B8-BF 




Control CCW 





These bytes are always generated when spanned processing is specified 



DTFSD (Workfiles) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


^filename 


0-15 


00-0F 




Command Control Block (CCB) 




16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

1= File assigned 'IGN ' (COBOL) 
1= Track hold option specified 
1= DTF relocated by OPENR 
Not used 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type for OPEN/CLOSE (X'20 1 = sequential 
access DASD files) 




21 


15 




1 

2 
3 
4 
5 
6 
7 


0= Disk device 

1= CLOSE macro is not to delete Format 1 and 

Format 3 file labels 

l=Work file 

Type of open : 1= Point; 0= Normal 

1= Routine entered from close routine 

1= File opened; 0= File closed 

Not used 

1= Re-entry to close routine 




22-28 


16-1C 




Filename (DTF name) 




29 


ID 




Device type Code : 
X'00'=2311 
X'01' =2314, 2319 
X'04 = 3330 
X'08'= 3340 general 
X'09'=3340 35MB 
X'0A'= 3340 70MB 

Note: In previous versions, last byte of filename 
contains device type code 




30-31 


1E-1F 




Track capacity counter 




32-35 


20-23 




Address of Format 1 label in VTOC (CCHR) 




36 


24 




Extent sequence number 




37 


25 



1 
2 
3 
4 
5 
6 
7 


Open communication byte 

Not used 

1= Device supports RPS 

Not used 

1= symbolic unit in DTF 

1= next extent on new volume 

1= extent opened 

Not used 

1= DTF has been extended into the partition 

virtual area 




38 


26 




Lower head limit 




39 


27 




Upper head limit 


&Filename.L 


40-41 


28-29 




Record length 




42-45 


2A-2D 




Initial extent lower limit 




46-49 


2E-31 




Current extent lower limit 




50-53 


32-35 




Extent upper limit 



DTFSD (Workfiles) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8F ilename.S 


54-55 


36-37 




Seek address (BB= X'0000') 




56-59 


38-3B 




Search address (CCHH) 




60 


3C 




Record number 




61 


3D 



1 
2 
3 
4 
5 
6 
7 


Switch byte used by logic module 

1= First write entry indicator 

1 = Write update indicator 

1= POINTS macro issued 

Not first record of a track (RECFORM= UNDEF) 

1= Track upper limit reached 

Not used 

1= Check after read/write 

Not used 




62-63 


3E-3F 




Maximum record length 




64 


40 




Verify chain bit 




65-67 


41-43 




Address of user's EOF routine 




68 


44 



1 

2 
3 
4 
5 
6-7 


Logical indicators 

l=ERROPT= address 

l=ERROPT= IGNORE 

1= Fixed-length unblocked records 

1= Verify specified 

l=ERROPT=SKIP 

1= Re-read after read error 

Not used 




69-71 


45-47 




Address of user read/write error routine 




72-143 


48-8F 




CCW chain for work files 




144-151 


90-97 




Input area for Verify CCW and Read Count CCW 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename 


IJICCB 


0-15 


00-OF 




Command Control Block (CCB) 




IJIMOD 


16 


10 




1 
2 
3 

4 
5 
6 

7 


1= Trailer labels 

Used by FREE macro 

1= COBOL Open/Ignore option 

1= Track hold option specified 

1= DTF relocated by OPENR 

Not used 

1= SPNUNB 

Used by CNTRL macro 






17-19 


11-13 




Address of logic module 






20 


14 




DTF type for OPEN/CLOSE 
(X'22'= direct access files) 




IJISWI 


21 


15 



1 
2 

3 

4 
5 

6 

7 


1= Output; 0= Input 

1= Verify option specified 

1= Search multiple track (SRCHM) 

specified 

1= WRITE AFTER or WRITE RZERO 

macro used 

l=IDLOC specified 

1= Undefined; 0=FIXUNB, 

VARUNB or SPNUNB 

1= RELTYPE= DEC 

1= End affile 




IJIFNM 


22-28 


16-1C 




Filename (DTF name) 




IJIDVTP 


29 


ID 




Device type: 

X'00'=2311; X'0r=2314, 2319; 
X'02' =2321; X'04'= 3330; 
X'08'= 3340 general ; X'09'= 
3340 35MB; X'0A'= 3340 70MB 




IJIUNT 


30-31 


1E-1F 




Starting logical unit address of 
the first volume containing the 
data file. This value is supplied 
by the OPEN from EXTENT cards 
(can be initially zero) 




IJIRPS 


32 


20 




1 
2-6 

7 


Not used 

1= Device supports RPS 

Not used 

1= DTF has been extended into 

the partition virtual area 




IJIULB 


33-35 


21-23 




Address of user's label routine 




IJIUXT 


36-39 


24-27 




Address of user's routine for pro- 
cessing EXTENT information 




IJIRELPT 


40 


28 




Pointer to relative address area: 
&Filename.P - SFilename 

2 
Address of a 2-byte field in which 




IJIERC 


41-43 


29-2B 














IOCS can store the error conditi- 












on or status codes 




IJITST 


44-45 


2C-2D 




Macro code switch for internal use: 

X'0000'= READ ID 

X'OOOT =READKEY 

X'0002'= WRITE ID 

X'0003'= WRITE KEY 

X'0004'= WRITE RZERO 

X'0005'= WRITE AFTER 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


By 


es 


Bits 


Function 


Dec 


Hex 




IJIBPT 


46-47 


2E-2F 




Pointer to channel program build 
area (oTilename.B) minus 32 




IJICB2 


48-63 


30-3F 




Control seek CCB 


&Filename.Z 


IJICCW 


64-71 


40-47 




Control Seek CCW for overlap 
seek routine 




IJIXMD 


72-75 


48-4B 




Channel program builder instruc- 
tion: XI 36(2), CO' 




IJIMSZ 


76-77 


4C-4D 




Maximum data length for FIXUNB 
or UNDEF records; BLKSIZE for 
VARUNB or SPNUNB records 




IJISPT 


78 


4E 




Pointer to READ ID string (File 
name.O); X'00' if no READ ID 
issued 






79 


4F 




Pointer to READ KEY string (File 
name.l); X'00' if no READ KEY 






80 


50 




Pointer to WRITE ID string (File 
name. 2); X'00' if no WRITE ID 
issued 






81 


51 




Pointer to WRITE KEY string (File 
name. 3); X'00' if no WRITE KEY 
issued 






82 


52 




Pointer to WRITE RZERO string 
(Filename. 4); X'00' if no WRITE 
RZERO issued 






83 


53 




Pointer to WRITE AFTER string 
(Filename. 5); X'00' if no WRITE 
AFTER issued 




IJITRK 


84-85 


54-55 




Track constant: 

2311: H'O' if key length=0 

H'20' if key length/0 

2314/2319: H'O' if key length=0 

H'45' if key length/0 

3330: H'135' if key length=0 

H'191' if key lenqth/0 

3340: H'167' if key length=0 

H'242' if key length^) 

2321 : H'O' if key length=0 

H'16' if key length^ 




IJIRIC 


86-87 


56-57 




2311 : H'61' 
2314/2319: H'101' 
3330 : H'135' 
3340 : H'167' 
2321 : H'84' 




IJILAT 


88 


58 



1 
2 
3 
4 


Not used 

1= Wrong-length record 

1= non data transfer error 

Not used 

1= no room found 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 






88 
(Cont'd) 




5-6 

7 


Not used 

1= Record out of extent area 






89 


59 



1 

2 
3 

4 
5 
6 
7 


1= Data check in count area 

1= Track overrun 

1= End of cylinder 

1= Data check when reading key 

1= No record found 
1= End of file 
1= End of volume 
Not used 




IJILBTK 


90-95 


5A-5F 




Label track address, XBCCHH, 
where X is the volume sequence 
number of the device on which the 
label track is located. 


The following section is indue 


ed if UNDEF, AFTER 


or RZERO is specified 


filename. L 


IJILST 


96-143 


60-8F 




Basic CCW's to build channel pro- 




IJIVIT 
IJIFRU 


144-183 
184-185 

186-187 


90-B7 
B8-B9 

BA-BB 




gram 

Basic CCW's for undefined length 
or formatting macros 
Instruction to give record length 
to user if record length is undefined 
(NOPR if no RECSIZE specified ) 
Instruction to get record length 
from user if record length is unde- 
fined. (NOPR0 if no RECSIZE 
specified) 


&Filename.F 


IJIFLD 


188-192 


BC-C0 




Work area (used for R0 address - 
CCHH0) 


&Filename.K 


IJICNT 


193-200 


C1-C8 




Work area (used for R0 data field) 


&Filename.C 


IJICTS 


201-208 


C9-D0 




Work area (included only for span- 
ned or variable records for record 
count field) 


The channel program builder st 
the channel program building a 


rings are generated fc 
rea 


>l lowing the DTFDA table and preceding 


&Filename.O 




Variable 




Channel program builder string for 
READ ID macro. If READ ID is not 
specified, the string is not gene- 
rated 


&Filename. 1 




Variable 




Channel program builder string for 
READ KEY macro. If READ KEY is 
not specified, the string is not ge- 
nerated 


&Filename.2 




Variable 




Channel program builder string for 
WRITE ID macro. If WRITE ID is 
notspecified, the string is not gene- 



DTF DA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec | Hex 


&Filename.3 
&f ilename.4 
&Filename.5 




Variable 
Variable 
Variable 




Channel program builderstring for 
WRITE KEY macro. If WRITE KEY 
is not specified, the string is not 
generated 

Channel program builder string for 
WRITE RZERO macro. If WRITE 
RZERO or WRITE AFTER is not speci- 
fied, the string is not generated 
Channel program builder string for 
WRITE AFTER macro. If WRITE 
RZERO or WRITE AFTER is not spe- 
cified, the string is not generated 


The following section contains the channel program build areas and varies in size 


Sfilename.B 




0-7 J 00-07 
Variable 

Variable 




Seek CCW that is generated at 
program assembly time and used 
by all channel programs 

Area to build: 

1) Eight CCW's if AFTER is not 
specified 

2) Eight CCW's if spanned or vari- 
able length records and AFTER= 
YES is specified 

3) Seven CCW's if undefined or 
fixed records and AFTER= YES 
is specified 

Area to build: 

1) Eight CCW's if AFTER is not 
specified and VERIFY= YES is 
specified 

2) Eight CCW's if spanned or vari- 
able length records and AFTER= 
YES and VERIFY= YES are spe- 
cified 

3) Five CCW's if undefined or fixec 
records and AFTER= YES and 
VERIFY= YES are specified 


The following section is added for spanned records only 






8 bytes 
8 bytes 
1 byte 



1 
2 
3 
4 
5-7 


Count save area 

SEEKADR save area 

1= Relative addressing 

1= IJIGET switch on 

1= Ignore hold switch on 

1= Reserved for use by DAMODV 

1= New volume SEEKADR 

Not used 



DTFDA (....Cont'd) 



DTF Assembly Module DSECT 
Label Label 



Bytes 



Function 



1 byte 

2 bytes 
12 bytes 

8 bytes 



Reserved 

Record size 

Work area 

Control word save area 



Thefollowing section is added to the DTFDA table if DSKXTNT (relative addressing) is specified 



SFilename.P 
&F ilename.l 



3X'00' for padding 

I DLOC record area (bucket used by 
module) 

SEEKADR in the form: 
M / B1 / B2,C1,C2 / H1,H2,R 

DC A(&SEEKADR) 

DCA(&IDLOC) 

Work area for RELTYPE= DEC 

Save area for CCHH portion of 
actual DASD address 

Alteration factor for CI in SEEK 
ADR (see bytes 112-119) 



3 bytes 
5 bytes 

8 bytes 

4 bytes 
4 bytes 
8 bytes 
4 bytes 

4 bytes 



4 bytes 



4 bytes 



Variable DSKXTNT table composed of a 

to end of variable number of 8-byte entries 

DTF table containing extent information 

the following format: 
Bytes 0-2 TTT2 - cumulative number of tracks in the DSK 
XTNT table entries up to and including 
the current entry 

3 M- volume sequence number 

4 B - bin number (0 for disk devices) 

5-7 TTT1 - relative track number of lower limit of 
this entry 

A 2-byteend-of-table indicator containing X'FFFF' 
follows the last entry in the DSKXTNT table 



2311 


X'OOOOOOOT 


2314/2319 


x'ooooooor 


3330 


X'00001300' 


3340 


X'OOOOOCOO' 


2321 


X'000003E8' 


Alteration 


actor for C2 in 


ADR (see b 


^tes 112-119) 


2311 


X'OOOOOOOA' 


2314/2319 


X'00000014' 


3330 


X'00000013' 


3340 


X'OOOOOOOC 


2321 


X'00000064' 


Alteration 


actor for HI in 


ADR (see b 


^es 112-119) 


2311 


X'OOOOOOOT 


2314/2319 


X'OOOOOOOT 


3330 


X'OOOOOOOT 


3340 


X'OOOOOOOT 


2321 


X'00000014' 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 



1 

2 
3 

4 

5 
6 

7 


Used by ISAM Interface Program 

Not used 

1= COBOL open; ignore option 

Not used 

1= DTF table address constants relocated by 

OPENR 
Not used 

1= Data set security 
l = Wrong blocksize error during file extension 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X"24'= LOAD) 




21 


15 




1 

2 
3 

4 
5 
6 

7 


Option byte: 

1=2321 (Version 1-2 only) 

Not used 

1= Cylinder overflow option 

Not used 

1= Blocked records (used by previous versions) 

1= Verify 

1= Indexes on 2321 (Version 1-2 only) 

1=2 I/O areas present 




22-28 


16-1C 




File name 




29 


ID 




Prime data device type indicator: 
X'00'= 231 1 ; X'01 '= 231 4/231 9 ; 
X'02'= 2321 ; X'04'= 3330 ; 
X'08'= 3340 general; X'09'= 
3340 35MB; X'0A'= 3340 70MB 


SFilename.C 


30 


IE 



1 
2 
3 

4 

5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR) 

1=WLR error 

1= Prime data area full 

1= Cylinder index area not large enough to 
reference prime data area. Set on only if 
error detected at SETFL time 

1= Master index not large enough to reference 
prime data area. Set on only if error detec- 
ted at SETFL time 

1= Duplicate record 

1= Sequence error 

l=No EOF record written in prime data area 




31 


IF 




High level index device type indicator: 
X'00'=2311 ;X'01'= 2314/2319; 
X'02'=2321 ; X'04'=3330 ; 
X'08'= 3340 general ; X'09'= 
3340 35MB ; X'0A'= 3340 70MB 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 



DTFlS(Lood) (...Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




33-34 


21-22 




First prime track in cylinder (HH) 




35 


23 




First prime data record in cylinder (R) 




36-37 


24-25 




Last prime track in cylinder (HH) 




38 


26 




High record on master index/cylinder index 
track (R) 




39 


27 




High record on prime data track (R) 




40 


28 




High record on overflow track (R) 




41 


29 




High record on last track index track in 
cylinder (whether shared or unshared) 




42 


2A 




High record on track index track other than last 
in cylinder. If only one track index track in 
cylinder, it is equal to byte 41 




43 


2B 



1 
2 
3 
4 

5 
6-7 


Condition code : 

1=WLR checks requested (for extension) 

1= First record in file 

1 = Prime data extent full 

1 = Master index/cylinder index extent too small 

1= Prime data upper limit has been increased 

(for extension) 

1= Extension 

Not used 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 


0-3 

4 
5 
6 

7 


Number of index levels 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index 

1= RPS type device (index) 


&F!lename.H 


66-73 


42-29 




Address of last prime data record (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block length (logical record length times 
number of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length plus 
physical record length plus 8) 



DTF IS (Load) (....Cont'd) 



DTF Assembly 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (in blocked records) 


This is the end 


of the com 
lerated ace 


mon DTF area. The format of the remainder of the table is vari- 
ording to the parameters specified in the DTF IS macro instruction 


&Filename.S 


96-103 


60-67 




Seek/search address area (MBBCCHHR) 


filename. P 


104-105 


68-69 




Logical record counter (for blocking) 




106-107 


6A-6B 




Number of bytes for high level index 




108-111 


6C-6F 




Prime data record counter (logical records) 




112 


70 


0-1 
2 

3-5 
6 

7 


Status indicators: 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Last block full 




113-117 


71-75 




Last track index normal entry address (CCHHR) 




118-122 


76-7A 




Last cylinder index entry address (CCHHR) 




123-127 


7B-7F 




Last master index entry address (CCHHR) 


&Filename.B 








CCW build area. See description of SETFL 
macro, phase 1 - SSBSETFL 




128-135 


80-87 




Seek CCW 




136-143 


88-8F 




Search ID Equal CCW 




144-151 


90-97 




TIC CCW 




152-159 


98-9F 




ReadAVrite CCW 




160-167 


A0-A7 




Search ID Equal CCW 




168-175 


A8-AF 




TIC CCW 




176-183 


B0-B7 




Verify CCW 


&Filename.M 


184-187 


B8-BB 




Address of IOREAL 




188-191 


BC-BF 




Address of data in WORKL. (FIXBLK= address 
of WORKL; F1XUNB= address of WORKL plus 
key). 




192-195 


C0-C3 




Address of key in WORKL. (FIXBLK= address 
of WORKL plus KEYLOC minus 1; FIXUNB = 
address of WORKL.) 




196-199 


C4-C7 




Block position indicator (address of logical 
record in IOAREAL) 




200 


C8 


0-2 
3 
4-6 

7 


Master index, extension indicator: 

Not used 

1= Extending file; 0= Creating file 
Not used 

1= Master index being used; 0= No master index 
being used 



DTFIS(Load) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




201-204 


C9-CC 




Cylinder index upper limit (CCHH) 




205-208 


CD-DO 




Master index upper limit (CCHH) 




209-215 


D1-D7 




Prime data upper limit (old upper limit if exten- 
sion) (MBBCCHH) 




216-222 


D8-DE 




Prime data new upper limit (for extension) 
(MBBCCHH) 




223 


DF 




Last prime data track in cylinder minus 1 




224-225 


E0-E1 




Key length minus one 




226-227 


E2-E3 




Logical record length minus 1 




228-229 


E4-E5 




Address of track index dummy record (HR) 




230-231 


E6-E7 




Address of record before first prime data record 
in cylinder (HR) 




232 


E8 




Number of records on master index/cyl inder 
index track minus 1 




233-236 


E9-EC 




Master index/cyl inder index DASD address 

control field (CCHH): 

2311 =X , OOC70009' 

2314/2319= X'00C70013' 

2321 = X'13090413' 

3330 = X'01FF0012' 

3340 =X , 01FF000B , (35MB) / X , 02FF000B' 




237-239 


ED-EF 




Prime data address control field (CCH): (70MB) 
2311 = X'00C700' 
2314/2319= X'00C700' 
2321 = X' 130904' 
3330 = X'OIFFOO' 




240-242 


F0-F2 




3340 = X'OIFFOO' (35MB), X'02FF00'(70MB) 

Prime data beginning of volume (CCH): 

2311 =X'000100' 

2314/2319= X'000100' 

2321 = X'OOOOOl ' 

3330 = X'000100' 




243-245 


F3-F5 




3340 j =X'00pl0p' _ u , 

Prime data end of volume (CCH): 

2311 =X , 0OC700' 

2314/2319= X'00C700' 

2321 = X' 130504' 

3330 = X'019300' 

3340 = X'015B00'(35MB), X'02B700 , (70MB) 




246-247 


F6-F7 




Used for alignment 




248-251 ' 


F8-FB 




First entry in DSKXTN table (logical unit, 
cell number) 




256-259 2 


100-103 




X'FFFFFFFF'=End of DSKXTN table 




260-263 


104-107 




Address of IOAREA2 




264-267 


108-1 OB 




Address used to relocate IOAREA2 



1) Each entry in the DSKXTN table is 4 bytes long. The minimum number of entries is 
two. There is one entry per extent. 

2) Location of the end-of -table indicator depends on length of DSKXTN table 



DTF1S (Add) - pert 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


^filename 


-15 


00-0F 




CCB 




16 


10 



1 

2 
3 
4 

5 
6 

7 


Used by ISAM Interface Program 

Not used 

1= COBOL open; ignore option 

1= Track hold specified 

1= DTF table address constants relocated by 

OPENR 
Not used 

1= Data set security 
1= Wrong blocksize error during addition tofile 




17-19 


11-13 




Logic module address 




20 


14 




File type for OPEN/CLOSE (X'25"= ADD) 




21 


15 



1 
2 
3 
4 
5 
6-7 


Option byte: 

1=2321 (Version 1-2 only) 

1= Prime data in core 

1= Cylinder overflow 

1= Cylinder index in core 

1= Blocked records 

1= Verify 

Not used 




22-28 


16-1C 




DTF file name 




29 


ID 




Prime data device type indicator: 
X'00'=2311 X'01'= 2314/2319 
X'02'= 2321 X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


SFilename.C 


30 


IE 




1 

2 
3 
4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLR) 

1=WLR error 

l=EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




Highest level index device type: 
X'00'=23n X'01'= 2314/2319 
X'02'= 2321 X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master index/cylinder 
index track (R) 



DTFIS (Add) - port 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




39 


27 




hilgh record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index (Tl) track (R) 




43 


2B 




1 
2 
3 

4 
5 
6 

7 


Retrieval byte : 

1= WORKR area specified 

1= WORKS area specified 

Overflow switch 

l=Read 

Not used 

1= Output 

1= Write key 

1 = PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




' Master index lower limit (MBBCCHH) 




65 


41 



1 
2-3 

4 
5 
6 

7 


Index level number, WAITF indicator : 

1= From WAITF routine 

1= WAITF seek check bit 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1 = Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length (RECSIZE) 




76-77 


4C-4D 




Key length (KEYLEN) 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records in 
block (NRECDS) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length (block size) 




88-89 


58-59 




Overflow record length plus key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length 
plus blocksize plus 8) 




92-93 


5C-5D 




Overflow record format length (key length 
plus logical record length plus 18) 




94-95 


5E-5F 




Key location (KEYLOC) for blocked records 




96-97 


60-61 




Constant = 5 




98-99 


62-63 




Constant = 10 



DTPS (Add) - parti (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
start of part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
start of part 1 


&Filename.S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


SFilename.W 


114-123 


72-7B 




Random/sequential retrieval work area 


&Filename.P 


124-127 


7C-7F 




Prime data record count 




128 


80 


0-1 

2 
3-5 

6 

7 


Status indicators: 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Block complete 




129-133 


81-85 




Last track index normal entry address (CCHHR) 




134-138 


86-8A 




Last cylinder index entry address (CCHHR) 




139-143 


8B-8F 




Last master index entry address (CCHHR) 




144-151 


90-97 




Last independent overflow record address 
(MBBCCHHR) 


&Filename.l 


152-153 


98-99 




Number of independent overflow tracks 


Sf ilename.A 


154-155 


9A-9B 




Number of full cylinder overflow areas 


SFilename.O 


156-157 


9C-9D 




Overflow record count 




158-164 


9E-A4 




Independent overflow area lower limit 
(MBBCCHH) 




165-171 


A5-AB 




Independent overflow area upper limit 
(MBBCCHH) 




172-175 


AC-AF 




A(SFilename.D) - Address of work area for 
cylinder overflow control record (COCR) 




176-179 


B0-B3 




A(&Filename.D+8) - Address of workarea for 
the current track index normal entry count field 




180-183 


B4-B7 




A(&Filename.D+16) - Address of work area for 
current track index overflow entry count field 




184-187 


B8-BB 




A(8Filename.D+24) - Address of workarea for 
current prime data record count field 




188-191 


BC-BF 




A(oTilename.D+32) - Address of work area for 
current overflow record count field 




192-195 


C0-C3 




A(&Filename.D+40) - Address of work area for 
track index normal entry data field 




196-199 


C4-C7 




A(&Filename.D+50) - Address of work area for 
current overflow record linkage field 




200-203 


C8-CB 




A(&IOREAL) - Address of IOREAL, the I/O 
area used for adding records to a file 



DTFIS (Add) - part I (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




204-207 


CC-CF 




A(&WORKL) - Address of WORKL, workarea 
containing user data records to be added to the 
file 




208-211 


D0-D3 




A(&Filename.K) - Address of the ADD key area 




212-215 


D4-D7 




A(&IOAREAL+B) - Address of key position in 
IOAREAL 




216-219 


D8-DB 




A(&IOAREAUS+&KEYLEN) - Address of data 
position in IOAREAL 



DTFIS (Add) -part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sfilename.2 


-3 

4 

5 -7 


00-03 
04 

05-07 




1-5 

6 

7 


A(8Filename. S+3) - Address of the seek/search 
address area plus 3 

1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 

A(SFilename.W) - Address of random/sequential 
retrieval work area 


The following information is generated if the cylinder index in core option is specified 




12-15 

16-17 

18-25 

26-30 
31 

32-35 


0C-0F 

10-11 

12-19 

IB-IE 
IF 

ID -23 



1 
2 
3 

4-7 


A(&INDAREA) -Starting address of main storage 
area specified for cylinder index 

AL2(&INDSIZE) - Number of bytes in main 
storage available for cylinder index 

Next cylinder index entry to be read 
(MBBCCHHR) 

Last cylinder index entry (CCHHR) 

Core index byte: 

1= First time through B-transient, S$BINDEX 

1= End of cylinder index reached 

1= Index skip option specified 

1= Suppress in-core option and read cylinder 

index 
Not used 

Pointer to key (stored by module) 



DTFIS (Add) -part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 1 Hex 


The following information is generated if the prime data in core add function is specified 
This information is aligned on a double word boundary 




36-37 


24-25 




Size of IOAREAL 




38-39 


26-27 




Maximum number of prime data records in main 
storage 




40-43 


28-2B 




Address of write CCW's 




44-47 


2C-2F 




Address of read CCW's 




48 


30 



1-7 


Switch byte: 
l=EOF 
Not used 




49-51 


31-33 




For boundary alignment 



DTFIS (Add) -part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


afilename.B 


-7 


00-07 




CCW X'07', filename. S+l, X'40\ 6 - Long 
seek CCW with command chaining 




8 -127 


08-7F 




Channel program build area. 


8F ilename.D 


128-135 


80-87 




Cylinder overflow control record (COCR) 




136-143 


88-8F 




Current track index normal entry count field 
address 




144-151 


90-97 




Current track index overflow entry count field 
address 




152-159 


98-9F 




Current prime data record count field address 




160-167 


A0-A7 




Current overflow record count field address 




168-177 


A8-B1 




Track index normal entry data field 




178-187 


B2-BB 




Current overflow record sequence link field 




188-197 


BC-B5 




Current track index overflow entry data field 




198 


C6 




X'OT -Add to EOF 

X'02' - Add to independent overflow area 




199-201 


C7-C9 




Overflow control bytes (CCH) 




202-203 


CA-CB 




High HR on overflow track 




204-211 


CC-D3 




Volume upper limit for prime data records 
(MBBCCHHR) 




212-217 


D4-D9 




CLC (&KEYLEN, 13), (6) - Unblocked 
CLC (&KEYLEN, 13), &KEYLOC-1 (6) - 
Blocked Ut! lity CLC for key 



DTFIS (Add) - port 3 (.. . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




218-223 


DA-DF 




MVC (&KEYLEN, 13),0 (12) - Unblocked 
MVC0(&KEYLEN,13),&KEYLEN-1 (12)- 
B locked Utility MVC for key 


&Filename.E 


224-227'j E0-E3 




First entry in DSKXTN table (logical unit, 
cell number) 




232-235 2 E8-EB 




4X'FF' - End of DSKXTN table 


&Filename.K 


236 + 


EC-end 




Key area for ADD only. Number of bytes de- 
pends on key length, KEYLEN 



1) Each entry in the DSKXTN table is four bytes long. The minimum number of entries is 
two. There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table. 



DTFIS (RETRVE, RANDOM) - part 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


filename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 




1 
2 
3 

4 

5-7 


Used by ISAM Interface Program 

1= GET issued 

1= COBOL open; ignore option 

1= HOLD option specified 

1= DTF table address constants relocated by 

OPENR 
Not used 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'26'= RETRVE) 




21 


15 



1 

2 
3 
4 
5 
6-7 


Option byte: 

1=2321 (Version 1-2 only) 

1- Prime data in core 

1= Cylinder overflow option 

1= Cylinder index in core option 

1 = Blocked records 

1= Verify 

Not used 




22-28 


16-1C 




File name (DTF name) 




29 


ID 




Prime data device type: 

X'00'=2311 X'01'= 2314/2319 

X'02'=2321 X'04'=3330 

X'08'= 3340 general 

X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


filename. C 


30 


IE 



1 

2 
3 

4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1 = WLR error 

l=EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




High level index device type: 
X'00^2311 X'01'= 2314/2319 
X'02'=2321 X'04'=3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master index/cylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 



DTFIS (RETRVE, RANDOM) - part 1 (. . . .Cont'd) 



DTF Assembly 


Bytes 




Function 


Label 


Dec 


Hex 








40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index track (R) 




43 


2B 




1 
2 
3 
4 
5 
6 
7 


Retrieval byte : 

l=WORKR specified 

1= WORKS specified 

Overflow switch 

l=Read key 

Not used 

1= Output 

1- Write key 

1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 




1 
2 
3 
4 
5 
6 
7 


Index level number, WAITF, and track hold 

indicators : 

1= From WAITF routine 

1- Seek check from WAITF 

1= Index track held 

1= Data track held 

1= RPS type device (data) 

1=RPS type DTF 

1- Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length key (key length plus 
physical record length) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length key (key length 
plus physical record length plus 8) 




92-93 


5C-5D 




Overflow record format length key (key length 
plus logical record length plus 18) 




94-95 


5E-5F 




Key location (blocked records) 



DTFIS (RETRVE, RANDOM) - part 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




96-97 


60-61 




Constant= 5 




98-99 


62-63 




Constant= 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
part 1 


6T ilename.S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


&Filename.W 


114-123 


72-7B 




Random/sequential retrieval work area 



DTFIS (RETRVE,RANDOM) - part 2 



DTF Assembly 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 


6Tilename.2 


-3 

4 


00-03 
04 




1-5 

6 

7 


Address of seek/search address area plus 3 
1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




Address of random/sequential retrieval work area 




8 -11 


08-0B 




Address of IOAREAS 




12-15 


0C-0F 




Address of IOAREAR 




16-19 


10-13 




Address of KEYARG 




20-23 


14-17 




Address of WORKR 




24-27 


18-1B 




Current sequential I/O area address 




28-31 


1C-1F 




4-byfe NO-OP instruction 




32 


20 




X'00'= No verify; X'40'= Verify 




33 


21 




X'08'= Unblocked; X'00'= Blocked 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Upper limit for sequential retrieval (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2'= Overflow record 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319; X'09'= 2321; 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential retrieval 


SFilename.H 


48-55 


30-37 




Current DASD address for sequential (MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address for sequential 
(MBBCCHHR) 



DTFIS (RETRVE, RANDOM) - part 2 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




64-65 


40-41 




Sequential record counter 




66-67 


42-43 




Current track index entry for sequential (HR) 


of ilename.T 


68-69 


44-45 




Number of records tagged for deletion 




70-71 


46-47 




Load IOREG for random retrieval 


&Filename.G 


72-7? 


48-4F 




DASD address save area (MBBCCHHR) 




80-83 


50-53 




Record pointer within I/O area for write operation 


&Fflename.R 


84-87 


54-57 




Nonfirst overflow record count 


The following 


information 


is generated when the cylinder index in core option is specified 




92-95 


5C-5F 




A(&INDAREA) - Starting address of main storage 
area specified for cylinder index 




96-97 


60-61 




AL2(&INDSIZE) - Number of bytes in main sto- 
rage available for cylinder index 




98-105 


62-69 




Next cylinder index entry to be read (MBBCCHHR) 
(Initialized by SSBINDEX to cylinder index 
starting address) 




106-110 


6A-6E 




Last cylinder index entry 




111 


6F 



1 

2 
3-7 


Core index byte: 

1= First time through transient 

1= End of index reached 

1= Index skip option 

Not used 




112-115 


70-73 




Pointer to key (stored by the module) 




116-131 


74-83 




Reserved 



DTFIS (RETRVE, RANDOM) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


oFilename.B 


-7 


00-07 




X'07 , ,8i : ilename.S+l,X'40 , / 6 - Long seek CCW 
with command chaining 




8 -63 


08-3F 




Area to build CCW -string 




64-67 I) 


40-43 




First entry in DSKXTN table (logical unit, cell 
number) 




72-75 2 ) 


48-4B 




4X'FF' End of DSKXTN table 



1) The length of one entry is the four bytes shown here. The minimum number of entries is 2. 
There is one entry per extent. 

2) The location of the end-of-table indicator depends on the length of DSKXTN table. 



DTFIS (RETRVE,SEQNTL) - part 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


^Filename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 




1 
2 
3 
4 

5 
6 

7 


Used by ISAM Interface Program 

1=GET issued 

1= COBOL open; ignore option 

1 = Track Hold specified 

1= DTF table address constants relocated by 

OPENR 
1= EOF on sequential retrieve 
1= Data set security 
1= Different blocksize in format 1 label than in 

DTFIS 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'26'= RETRVE) 




21 


15 




1 
2 
3 

4 
5 
6 

7 


Option byte: 

1=2321 (Version 1-2 only) 

1= Prime data in core 

1= Cylinder overflow option 

1= Cylinder index in core option 

1= Blocked records 

1= Verify 

1= IOAREAS just used; 0= IOAREA2 just used 

1=2 I/O areas present 




22-28 


16-1C 




File name (DTF name) 




29 


ID 




Prime data device type: 

X'00'=2311 X'0T= 2314/2319 

X'02'= 2321 X'04'= 3330 

X'08'= 3340 general 

X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


&Filename.C 


30 


IE 



1 
2 
3 

4 
5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1 = WLR error 

l=EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




High level index device type: 
X'00'=2311 X'01'= 2314/2319 
X'02'=2321 X'04'=3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4) 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 



DTFIS (RETRVE, SEQNTL) - port 1 (.. .Cont'd) 



DTF Assembly 


Bytes 


Bits 


Function 


Label 


Dec 


Hex 








38 


26 




High record number on mcster index/cylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index track (R) 




43 


2B 



1 
2 
3 
4 

5 
6 

7 


Retrieval byte : 

1= WORK R specified 

1= WORKS specified 

Overflow switch 

1= Read key 

1= First record being processed (after issuing 

SETL macro) 
1= Output 
1= Write key 
1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-6 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 




1 

2-3 

4 

5 

6 

7 


Index level number, WA1TF indicator : 

1= From WAITF routine 

1=WAITF seek check bit 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length 
plus physical record length plus 8) 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (blocked records) 



DTFIS (RETRVE,SEQNTL) - port 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename.S 
&Filename.W 


96-97 
98-99 
100-101 

102-103 

104-113 
114-123 


60-61 
62-63 
64-65 

66-67 

68-71 
72-7B 




Constant= 5 

Constant= 10 

Displacement of part 2 of the DTFIS table from 
part 1 

Displacement of part 3 of the DTFIS table from 
part 1 

Seek/search address area (MBBCCHHRFP) 

Random/sequential retrieval work area 



DTFIS (RETRVE,SEQNTL) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename.2 


-3 


00-03 




Address of seek/search address area plus 3 




4 


04 




1-5 

6 

7 


1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




Address of random/sequential retrieval work area 




8 -11 


08-OB 




Address of IOAREAS 




12-15 


0C-0F 




Address of IOAREA2 




16-19 


10-13 




Address of KEYARG 




20-23 


14-17 




Address of WORKR 




24-27 


18-1B 




Current sequential I/O area address 




28-31 


1C-1F 




LIOREG,*-4- Load IOREG 




32 


20 




X'00'= No verify; X'40'= Verify 




33 


21 




X'08'= Unblocked records; X'00'= Blocked rec'ds 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Upper limit for sequential retrieval (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H '2'= Overflow record 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319; X'09'=2321 ; 
X'FF^SSO, 3340 




43-47 


2B-2F 




Initial values for sequential (CCHHR) 


Sfilename.H 


48-55 


30-37 




Current DASD address for sequential retrieval 
(MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address (MBBCCHHR) 



DTFIS (RETRVE,SEQNTL) - port 2 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




64-65 
66-67 


40-41 
42-43 




Sequential record counter 
Current track index entry (HR) 



DTFIS (RETRVE,SEQNTL) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename.B 
&Filename.E 


-7 

8 -63 
64-67 1) 

72-75 2 ) 


00-07 

08-3F 
40-43 

48-4B 




X'07',oTilename.S+l, X'40',6 - Long seek 
CCW with command chaining 

Area to build CCW-string 

First entry in DSKXTN table (logical unit, cell 
number) 

4X'FF' -End of DSKXTN table 



1) The length of one entry is the four bytes shown here. The minimum number of entries is 2. 
There is one entry per extent. 

2) The location of the end-of-table indicator depends on the length of DSKXTN table. 



DTFIS (ADD RTR) - part 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


SFilename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 



1 
2 
3 
4 

5 
6 

7 


Used by ISAM Interface Program 

1=GET issued 

COBOL open; ignore option 

1 = Track hold option specified 

1= DTF table address constants relocated by 

OPENR 
EOF switch 
1= Data set security 
1 = Wrong blocksize error during addition to file 




17-19 


11-13 




Logic module address 




20 


14 




File type for OPEN/CLOSE (X'27'= ADDRTR) 




21 


15 



1 
2 
3 
4 


Option byte: 

1=2321 (Version 1-2 only) 

1= Prime data in core 

1= Cylinder overflow 

1= Cylinder index in core 

1= Blocked records 



DTFIS (ADDRTR) - part 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




21 
(Cont'd) 




5 
6 

7 


1= Verify 

1= IOAREAS just used; 0= IOAREA2 just used 

1= 2 I/O areas present 




22-28 


16-1C 




DTF file name 




29 


ID 




Prime data device type indicator: 
X'00'=2311 X'01'= 2314/2319 
X'02'=2321 X'04'=3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


&filename.C 


30 


IE 




1 

2 
3 
4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1=WLR error 

1= EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




Highest level index device type: 
X , 0O , -2311 X'01'= 2314/2319 
X'02'=2321 X'04'=3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4. 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master index/cylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index (Tl) track (R) 




43 


2B 



1 
2 
3 
4 

5 
6 
7 


Retrieval byte: 

l=WORKR area specified 

1 = WORKS area specified 

Overflow switch 

1= Read 

1= First record being processed (after issuing 

SETL macro) 
1= Output 
1 = Write key 
1=PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 



DTFIS (ADDRTR) - part 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 



1 

2 
3 

4 
5 
6 

7 


Index level number, WAITF and track 

hold indicators : 

1-From WAITF routine 

1= Seek check from WAITF 

1= Index track held 

1= Data track held 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index; 0= cylinder index 

1= RPS type device (index) 


&Filename.H 


66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length (RECSIZE) 




76-77 


4C-4D 




Key length (KEYLEN) 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records in 
block (NRECDS)) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus phy- 
sical record length (block size) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length plus 
block size plus 8) 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (KEYLOC) for blocked records 




96-97 


60-61 




Constant = 5 




98-99 


62-63 




Constant = 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
start of part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
start of part 1 


&Filename.S 


104-113 


68-71 




Seek/search address area 


&Filename.W 


114-123 


72-7B 




Random/sequential retrieval work area 


&FIIename.P 


124-127 


7C-7F 




Prime data record count 




128 


80 


0-1 
2 

3-5 
6 

7 


Status indicators : 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Block complete 



DTFI5 (ADDRTR) - part 1 ( Cont'd) 



DTF Assembly 

Label 


By 


tes 


Bits 


Function 


Dec 


Hex 




129-133 


81-85 




Last track index normal entry address (CCHHR) 




134-138 


86-8A 




Last cylinder index entry address (CCHHR) 




139-143 


8B-8F 




Last master index entry address (CCHHR) 




144-151 


90-97 




Last independent overflow record address 
(MBBCCHHR) 


8f ilename. 1 


152-153 


98-99 




Number of independent overflow tracks 


&Filename.A 


154-155 


9A-9B 




Number of full cylinder overflow areas 


& ilename. 


156-157 


9C-9D 




Overflow record count 




158-164 


9E-A4 




Independent overflow area lower limit (MBBCCHH) 




165-171 


A5-AB 




Independent overflow area upper limit (MBBCCHH) 




172-175 


AC-AF 




A(<5Filename.D)- Address of work area for cy- 
linder overflow controlrecord (COCR) 




176-179 


B0-B3 




A(&Filename.D+8) - Address of work area for 
the current track index normal entry count field 




180-183 


B4-B7 




A(&Filename.D+16) - Address of work area for 
current track index overflow entry count field 




184-187 


B8-BB 




A(8Filename.D+24) - Address of work area for 
current prime data record count field 




188-191 


BC-BF 




A(<5Filename.D+32) - Address of work area for 
current overflow record count field 




192-195 


C0-C3 




A(&Filename.D+40) - Address of work area for 
track index normal entry data field 




196-199 


C4-C7 




A(&Filename.D+50) - Address of work area for 
current overflow record sequence-link field 




200-203 


C8-CB 




A(SIOAREAL) - Address of IOAREAL, the I/O 
area used for adding records to a file 




204-207 


CC-CF 




A(&WORKL) - Address of WORKL, work area 
containing user data records to be added to a file 




208-211 


D0-D3 




A(SFilename.K) - Address of the ADD key area 




212-215 


D4-D7 




A(&IOAREAL+8) - Address of key position in 
IOAREAL 




216-219 


D8-DB 




A(&IOAREAL+8+&KEYLEN) - Address of data 
position in IOAREAL 



DTFIS (ADDRTR) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sfilename.2 


-3 


00-03 




A(Sf ilename.S+3) - Address of the seek/search 
address area plus 3 




4 


04 




1-5 

6 

7 


l=Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check is 
indicated 




5 -7 


05-07 




A(oTilename.W) - Address of the random/sequen- 
tial retrieval work area 




8 -11 


08-0B 




Address of IO AREAS, I/O area used for sequen- 
tial retrieval 




12-15 


0C-0F 




Address cf IOAREAR, I/O area used for random 
retrieval or address of IOAREA2 (if specified) for 
sequential retrieval 




16-19 


10-13 




Address of KEYARG, field containing usersupplied 
key used for random READ/WRITE operations and 
sequential retrieval initiated by key 




20-23 


14-17 




Address of WORKR, work area used for random 
retrieval 




24-27 


18-1B 




Current sequential I/O area address 




28-31 


1C-1F 




1) L IOREG,*-4 - Load I/O register for sequen- 
tial or 

2) 4- byte NO-OP instruction for random 




32 


20 




X'00'= No verify; X'40'= Verify 




33 


21 




X'00'= Blocked; X'08'= Unblocked 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Limits for sequential (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2'= Overflow records 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1 ,2314 or 2319; X'09'= 2321; 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential 


8f ilename.H 


48-55 


30-37 




Current sequential DASD address (MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address (MBBCCHHR) 




64-65 


40-41 




Sequential record count 




66-67 


42-43 




Current track index entry for sequential (HR) 


8F ilename.T 


68-69 


44-45 




Number of records tagged for deletion 




70-71 


46-47 




LR &!OREG,0 for random (or 2-byte NO-OP 
for sequential) 


&Ftlename.G 


72-79 


48-4F 




DASD address save area for random retrieval 
(MBBCCHHR) 



DTFIS (ADDRTR) - part 2 (....Cont'd) 



DTF Assembly 
Label 


By 
Dec 


tes 
Hex 


Bits 


F—h. 




80-83 


50-53 




Record pointer within I/O area for write (for 
random retrieval) 


SFilename.R 


84-87 


54-57 




Non-first overflow record count 


The following information is genera 
Bytes 88-91 (58-5B) are not used. 


ed if the cylinder index in core option is specified. 




92-95 


5C-5F 




A(&INDAREA) - Starting address of main storage 
area specified for cylinder index 




96-97 


60-61 




AL2(&INDSIZE) - Number of bytes in main sto- 
rage avialable for cylinder index 




98-105 


62-69 




Next cylinder index entry to be read 
(MBBCCHHR) 




106-110 


6A-6E 




Last cylinder index entry (CCHHR) 




111 


6F 



1 
2 
3 

4-7 


Core index byte: 

1= First time through B-transient, SSBINDEX 

1= End of cylinder index reached 

1= Index skip option specified 

1 = Suppress index in-core option and read 

cylinder index 
Not used 




112-115 


70-73 




Pointer to key (stored by module) 


The following information is genera 
This information is aligned on a dou 
prime data in core add functions are 
(116-131) (74-83). 


ed if 
)le w 
spec 


the prime data in core add function is specified. 
ord boundary. If both cylinder index in core and 
ified, the following information is found in bytes 




116-117 


74-75 




Size of IOAREAL 




118-119 


76-77 




Maximum number of prime data records in main 

storage 




120-123 


78-7B 




Address of write CCW's 




124-127 


7C-7F 




Address of read CCW's 




128 


80 



1-7 


Switch byte: 
l=EOF 
Not used 




129-131 


81-83 




For boundary alignment 



DTFIS (ADDRTR) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


3F ilename.B 


-7 


00-07 




X'07', SFilename.SH, X'40', 6 - Long seek 
CCW with command chaining 




8 -63 


08-3F 




Channel program build area 




64-127 


40-7F 




Channel progr. build area for add function only 


&F ilename.D 


128-135 


80-87 




Cylinder overflow control record (COCR) 




136-143 


88-8F 




Current track index normal entry count field 




144-151 


90-97 




Current track index overflow entry count field 




152-159 


98-9F 




Current prime data record count field 




160-167 


A0-A7 




Current overflow record count field 




168-177 


A8-B1 




Track index normal entry data field 




178-187 


B2-BB 




Current overflow record sequence-link field 




188-197 


BC-C5 




Current track index overflow entry data field 




198 


C6 




X'Ol' -Add to EOF 

X'02' - Add to independent overflow area 




199-201 


C7-C9 




Overflow control bytes (CCH) 




202-203 


CA-CB 




High HR on overflow track 




204-211 


CC-D3 




Volume upper limit for prime data records 
(MBBCCHHR) 




212-217 


D4-D9 




CLC 0(&KEYLEN, 13),0(6) - Unblocked 

CLC 0(&KEYLEN, 13), &KEYLOC-l(6) - Blocked 

Utility CLC for key 




218-223 


DA-DF 




MVC 0(&KEYLEN, 13),0(12) - Unblocked 
MVC0(&KEYLEN,13),&KEYLOC-l(12) - 
Blocked Utility MVC for key 


&Filename.E 


224-227 ' 


1 E0-E3 




First entry in DSKXTN table (logical unit, cell 
number) 




232-235 2 


1 E8-EB 




4X'FF' - End of DSKXTN table 


&Filename.K 


236 + 


EC-end 




Key area for add only. Number of bytes depends 
on key length, KEYLEN 



1) Each entry in the DSKXTN table is four bytes long. The minimum number of entries is 2. 
There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table. 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


0-15 


0-F 






Command Control Block (CCB). 


16 


10 


0-3 

4 


B'0000' 


Not used. 

1=DTF relocated by OPENR. 






5-7 


B'000' 


Not used. 


17-19 


11-13 






Address of logic module. 


20 


14 




X'lA' 


DTF type for OPEN/CLOSE 
(X'lA'^iskettefile). 


21 


15 







l=Command chained file. 






1-2 


B'OO' 


Not used. 






3 




l=Work area specified. 






4 


B'O' 


Not used. 






5 




l=Open; 0=Close. 






6 




l=lnput; 0=Output. 






7 




Not used. 


22-28 


16-1C 






Filename. 


29 


ID 




X'06' 


Device type code (X'06=3540). 


30-35 


1E-23 




C'OOCHROO' 


Address of HDR1 label in VTOC. 


36-37 


24-25 






Volume sequence number. 


38 


26 







Open communications byte. 

Input File 

l=No more extents 






1-2 


B'OO' 


Not used. 






3 




l=Exit for user's EOF routine. 






4 




l=Next extent on new volume. 






5-6 




Not used. 






7 




l=Extent switch. 
Output File 








1 




l=No more extents. 

l=Extents needed at Close time. 






2-3 


B'OO' 


Not used. 






4 




l=Next extent on new volume. 






5 




l=Extent entered via console. 






6-7 




Not used 


39 


27 



0-7 




l=Extent bypassed before file 
opened (input). 
Sequence number of current 
extent opened (output). 


40 


28 






Sequence number of last extent 
opened. 


41-43 


29-2B 




X'OOOOOO' 


Reserved. 


44-47 


2C-2F 






Address of IOAREA1 . 


48-51 


30-33 






Address of last Read/Write CCW 
in chain. 


52-53 


34-35 




xwor 


Lower record limit. 


54-57 


36-39 




X'OOCCOORR' 


End-of-data seek address (last 
record + 1) 


58-59 


3A-3B 






Number of records in I/O area 
(used in short chain processing). 


60-63 


3C-3F 




X'OOFFOOOl' 


Seek argument (0CHR). 


64-67 


40-43 






End-of-file routine address 
(input); 4X'0O' (output). 


68-71 


44-47 




X'0049001A' 


Seek argument control field. 


72 


48 






Command chaining factor. 



DTFDU ( Continued) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


73 


49 




1 
2 
3 
4 


B'O 1 


Switch byte 1 . 

l=Not first entry after open. 

Not used. 

l=ln close routine (output). 

l=Error chain to be skipped. 

l=End of extent. 






5-7 


B'000' 


Not used. 


74-75 


4A-4B 






(record size multiplied by 
command chain factor)- 1. 


76-80 


4C-50 




X'FFFFFFFFFF' 


Seek argument bucket. 


81-83 


51-53 




X'OOOOOO' 


Reserved . 


84-87 


54-57 






Instruction to load user's l/O 
register (or NOP). 


88-91 


58-5B 






Address of current I/O area. 


92-95 


5C-5F 






Logical record size. 


96-99 


60-63 






Address of last byte of the 
I/O area. 


100 


64 



1 
2 
3 
4 
5-7 




Logical indicators. 
1: ERROPT=address. 
1: ERROPT=IGNORE. 
1: ERROPT=SKIP. 
Not used. 
l=Two I/O areas. 
Not used. 


101-103 


65-67 






Address of user's error handling 
routine. 


104 


68 






CCW count (write command 
only). 


105 


69 




1 
2 




Allowed operations 
l=Allow read commands. 
l=Allow write commands. 
l=Suppress unit check on C4/C6. 






3-7 


B'00000' 


Not used. 


106 


6A 




X'OO' 


Sector factor (X'00'=128). 


107 


68 




X'OO' 


Reserved. 


108 


6C 



1 
2 
3 
4 
5 
6 




l=Write protect. 

l=NofeedatEOF. 

l=Check multivolume sequence. 

l=Multivolume file. 

l=Verify requested. 

I=c6s written (update ERMAP) . 

l=Read/Write security. 






7 


B'O' 


Not used. 


109-111 


6D-6F 




X'OOOOOO' 


Not used. 


112-119 


70-77 






Feed CCW. 


120-127 


78-7F 






Define ops CCW (output); 
8X'00' (input). 


128-135 


80-87 






Seek CCW. 


136-143 


88-8F 






TIC CCW. 


144-X 


90-Y 




X=14348*(/of CCWs) 
Y=8F+8*(/ of CCWs) 


Read/Write data CCWs, 1,2, 13, 
or 26. 
Read/Write CCWs. 


X+l 


Y+l 






NOP CCW (output only). 



DTFPH (Magnetic Tape) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 


16 


10 


0-1 

2 

3 

4 

5 
6 

7 




Not used 

COBOL open; ignore option 

Not used 

DTF Table address; constants relocated 

by OPENR 

Not used 

1= ASCII 

0= EBCDIC 

Not used 


17-19 


11-13 




3X'00' 




20 


14 




X'12' 
X'14' 


Standard labeled, output 
Standard labeled, input, forward 


21 


15 


0-3 

4 

5-7 




Not used 

1= input; 0= output 

Not used 


22-29 


16-1D 






Symbolic filename 


30 


IE 






Not used 


31 


IF 


0-4 

5 

6-7 


B'01100' 


Used as displacement by OPEN 








Reserved 


32 


20 




1-2 

3 

4 

5 

6-7 




1= Standard labels 

Not used 

1= No rewind 

Not used 

User label address; l=yes, 0= no 

Not used 


33-35 


21-23 






User label routine address 


36 


24 



1 
2 
3 
4 
5-7 




1= DTFPH table 

Not used 

File switch: 1= input, 0= output 

Not used 

1= EOF switch 

Not used 


37-39 


25-27 






User label exit 


40-43 


28-2B 




DCF'O' 


Reserved for OPEN 


44-87 


2C-57 






EOV routine 


88-89 


58-59 




DC 2X'00' 


Reserved for OPEN 


90-95 


5A-5F 




DC 6X'00' 


File serial number 


96-99 


60-63 




DC 4X'00' 


Volume sequence number 


100-103 


64-67 




DC 4X'00' 


File sequence number 



DTFPH (Sequential Disk) 



By 


es 


Bits 


Function 


Dec 


Hex 


-15 


00-0F 




CCB 


16 


10 



1 

2 

3 

4 

5-7 


1= Dequeue old volume extents 

Not used 

1= File assigned 'IGN' (COBOL) 

Not used 

1=DTF relocated by OPENR 

Not used 


17-19 


11-13 




3X'00' 


20 


14 




DTF type (X'21 1 ) 


21 


15 




1 
2 
3 
4 
5 
6 
7 


Open/Close indicators 

1=2321 (Version 1-2 only) 

1= Blocked files 

1= Work file 

1= Work area 

1= Not version 1 table type 

l=Open; 0= Closed 

1= Input; 0= Output 

1= User labels specified 


22-28 


16-1C 




Filename (See byte 29) 


29 


ID 




Device type code: 

X'00' = 231 1 X'08'=3340 general 
X'01'= 2314,2319 X'09'=3340 35 MB 
X'02'= 2321 X , 0A , =3340 70 MB 
X'04'= 3330 


30 


IE 




C'F*= EOF indicator for DTFPH 


30-35 


1E-23 




(BCCHHR) Address of Fl label in VTOC (output) 
(BCCHHR) Address of next DLBL-EXTENT record (input) 


36-37 


24-25 




Volume sequence number 


38 


26 




Open communication byte: 
Output 







1 
2 
3 
4 
5 
6 
7 


1= No more EXTENTS 

1= EXTENTS for LIOCS at close 

1= Process trailer labels 

1= Process header labels 

1= New volume on next extent 

1= EXTENTS entered via console 

1= Process trailer labels at close 

1 = Check EXTENT for minimum of 2 tracks 

Input 







1 

2 
3 
4 
5 


1= No more EXTENTS 

Not used 

l=NoFl label, process EXTENTS only 

Not used 

1= New volume on next EXTENT 

Not used 





DTFPH (Sequential Disk) (.. .Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


38 
(Cont'd) 


26 


6 

7 


Open communications byte (Input) (Cont'd) 

1= Process header labels 
Not used 


39 


27 




Sequence number of current EXTENT being opened 


40 


28 




Sequence number of last EXTENT opened (not a console EXTENT 


41-43 


29-2B 




Address of user's label routine 


44-47 


2C-2F 




Address of IOAREA1 


48-51 


30-33 




CCHH address of user's label track. Initially X'80000000' 


52-53 


34-35 




Lower head limit (HH) X'0000' if type 1; X'OOnn" if type 128 
(n=head limit) 


54-57 


36-39 




EXTENT upper limit (CCHH) 


58-59 


3A-3B 




BB seek address: 

X'0000' if disk device 

X'OOnn' if 2321 whre 'nn'=bin number 


60-63 


3C-3F 




EXTENT lower limit (CCHH) 


64 


40 




Record number: 1= Input; 0= Output 


65-67 


41-43 




Not used 


68-71 
72 


44-47 
48 




CCHH control bucket 

CCHH=X' 13090413' if 2321 type 1 

CCHH= X'00C80009' if 2311; X'00C80013' if 2314 or 2319; or 

X'01940012' if 3330 type 1 
CCHH=X'130904nn' if 2321 type 128 
CCHH=X'00C800nn' If 231 1,2314,2319 type 128 
CCHH=X'019400nn' if 3330 type 128 
CCHH= X'015C0003' if 3340 35 MB 
CCHH= X'02B8000B' i c 3340 70 MB. See note : 
Record number 


73 


49 




Not used 


74-75 


4A-4B 




Not used 


76-80 


4C-50 




CCHHR bucket= extent lower limit and record number 


81-83 


51-53 




Not used 



= current upper head number 



DTFPH (DAM FILES) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


0-F 




CCB 


16 


10 




X'08' indicates DTF relocated by OPENR. 


17-19 


11-13 




3X'00'. 


20 


14 




DTF type (X'23'). 


21 


15 




Option codes. 








1 


l=Output, 0=lnput. 
Not used. 






2 


Not used. 






3 


Not used. 






4 


Not used. 






5 


Not used. 






6 


1=2321 (Version 1/2 only). 






7 


Not used. 


22-28 


16-1C 




Filename 


29 


ID 




Device type code : 
X'00' = 2311 
X'01' =2314, 2319 
X'02' = 2321 
X*04' = 3330 
X'08' = 3340 general 
X'09' = 3340 35MB 
X'0A' = 3340 70MB. 


30-31 


1E-1F 




Logical unit address of first volume containing 
the file. 


32 


20 




X'40'=Device supports RPS. 


33-35 


21-23 




Address of user label routine. 


36-39 


24-27 




Address of user routine to process EXTENT information. 



DTFPH (DISKETTE) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


0-F 




CCB. 


16 


10 





l=Dequeue old volume extents. 






1-3 


Not used. 






4 


1=DTF relocated by OPENR. 






5-7 


Not used. 


17-19 


11-13 




3X'00'. 


20 


14 




DTF type(X'21'). 


21 






Open/close Indicators. 






0-2 


Not used. 






3 


l=Workarea. 






4 


l=Not version 1 DTF table type. 






5 


l=Open; 0=Closed. 






6 


l = lnput ; 0=Output. 






7 


Not used. 


22-28 


16-1C 




Filename (see byte 29). 


29 


ID 




Device type code (3540=X'06'). 


30 


IE 




C'F'=EOF indicator for DTFPH. 


30-35 


IE -23 




(0CHR00) Address of HDR1 label in VTOC 
(output). 


36-37 


24-25 




Volume sequence number. 


38 


26 




Open communications byte. 
Input 









l=No more extents. 






1-3 


Not used. 






4 


l=New volume or new extent. 






5-7 


Net used. 
Output 







1 


l=No more extents. 
l=Extents for LIOCS at close. 






2-3 


Not used. 






4 


l=New volume on next extent. 






5 


l=Extents entered via console. 






6 


Not used. 






7 


l=Check extent for minimum of 2 tracks. 


39 


27 




Sequence number of current extent being opened. 


40 


28 




Sequence number of last extent opened (not a console 
extent entry). 


41-43 


29-2B 




Not used. 


44-47 


2C-2F 




Address of IOAREA1. 


48-51 


30-33 




Not used. 


52-53 


34-35 




X'0000'. 


54-57 


36-39 




Extent upper limit ( 0CHR). 


58-59 


3A-3B 




Not used. 


60-63 


3C-3F 




Extent lower limit (0CHR). 


64 


40 




Record number. l=lnput, 0=Outpur. 


65-67 


41-43 




Not used. 


68-71 


44-47 




0CHR control bucket. 

0CHR= X'0049001A' for 3540 (output only). 


72 


48 




Record number. 


73 


49 




X'10' - multivolume file (input) 

X'40" - last volume on multivolume file (input). 



DTFPH (DISKETTE) (■ . .Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


74 
75 
76-80 

81-83 


4A 
4B 
4C-50 

51-53 




Record size (maximum of 128) 

Not used. 

OCHR bucket = extent lower limit and record 

number (output). 

Not used. 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-0F 




CCB. If RPS is supported, the CCW address in bytes 
9-1 1 (09-0B) is changed by OPEN to point to an 
RPS CCW string in the user virtual area. CLOSE 
restores it. 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


Not used. 






4 


DTF table address constants relocated by OPENR. 






5-7 


Not used. 


17-19 


11-13 




Address of logic module. If RPS is supported, OPEN 
changes this address to point to an RPS version of the 
logic module in the system virtual area. CLOSE 
restores it. 


20 


14 




DTF Type =X'33\ 


21 


15 




Open/Close indicators - X'02 , =input, X'00'=output. 


22-28 


16-1C 




Symbolic filename. 


29 


ID 




DASD or diskette device indicators 

X'00'=2311 

X'01'=2314, 2319 

X"04'=3330 

X'08'=3340 general 

X'09'=3340 35MB 

X'0A'=334070MB. 


30-35 


IE -23 




DASD address of format-1 label. 


36-37 


24-25 




DASD or diskette volume sequence number. 


38 


26 




Open communications switch. 









l=No more extents — diskettes. 






1-3 


Not used. 






4 


Always 1. 






5-7 


Not used. 


39 


27 




Sequence number of current extent. 


40 


28 




Sequence number of last extent, or X'80' for 1442 
reader punch. 


41 


29 




Open indicator = X'20'. 


42 


2A 




Device type indicators : 







1 


Unused. 

1=DTF has been extended into the partition GETVIS 

area. 






2 


1=DASD 






3 


l=tape 






4 


l=printer 






5 


l=punch 






6 


l=reader 






7 


1=RPS supported. 


43 


2B 




Logic module device indicators : 
X'F3' = DASD or diskette device. 
X'Fl' = reader or tape device. 
X'FO' = other type devices. 



DTFDI (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


44 


2C 




Logic module option switches 








1 


l=input, 0=output. 

l=eject for RDR-PCH; 0=no eject. 






2 


l=not first pass; 0=first pass. 






3 


l=two I/O areas; 0=one I/O area. 






4 


1=2540 Punch. 






5 


1=SYSLST/SYSPCH. 






6 


l=Tape SYSLST/SYSPCH. 






7 


1=ASCII ; 0-EBCDIC code. 


45-47 


2D-2F 




Alternate I/O area address. 


48-51 


30-33 




Reserved for future use. 


52-53 


34-35 




Extent lower head limit. 


54-57 


36-39 




Extent upper head limit. 


58-64 


3A-40 




DASD seek address. 

Diskette seek address at byte 60 (3C). 


65-67 


41-43 




Users EOF address. 


68-72 


44-48 




Control bucker CCHHR. 

Byte 72 (48) always X'Ol' for diskettes. 


73 


49 




Logic module switches 

X'01'=input 

X'00'=outpuf 

X'00'=both input and output on diskettes. 


74-75 


4A-4B 




Logic module constants 
X'0020' DASD output 
X'0018' DASD input 
X'0008' Diskette devices 
X'0000' Non-DASD devices. 


76-80 


4C-50 




Count field CCHHR (0CHR0 for diskettes). 


81 


51 




Key length. 


82-83 


52-53 




Data length. 


84-87 


54-57 




Instruction to load IOREG with correct I/O area 
address . 


88-103 


58-67 




Seek, Search CCWs. 

Seek, Read/Write CCWfor diskette files. 


104-111 


68-6F 




TIC CCW. 

NOP CCW for diskette output files; unused for 

diskette input files. 


112-119 


70-77 




Input/output CCW. 


120-127 


78-7F 




Second output CCW. 


128-151 


80-97 




Verify CCWs for output. 


152-159 


98-9F 




Error CCW1 . 


160-167 


A0-A7 




Error CCW2. 


168-231 


A8-E7 




Save area (64 bytes). 


232-235 


E8-EB 




DC A(WLRERR) if WLRERR=Address. 
B 28(15) if ERROPT=omitted. 
B 25(15) if ERROPT=SKIP. 
B 28(15) if ERROPT=IGNORE. 


236-239 


EC-EF 




DC A(ERROPT) if ERROPT=Address. 
B 0(15) if ERROPT=omitted. 
B 24(15) if ERROPT=SKIP. 
B 28(15) if ERROPT=IGNORE. 



DTFCP (DISK=YES) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-0F 




CCB. If RPS is supported, the CCW address in bytes 
9-11 (09-0B) Is changed by OPEN to point to an RPS 
CCW string in the user virtual save area. CLOSE 
restores It. 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


X'10' indicates an unlabeled FORTRAN tape. 






4 


DTF table address constants relocated by OPENR. 






5 


Used by FORTRAN (Sequential Disk Backspace and 
Rewind). 






6 


1 -ASCII, 0- EBCDIC. 






7 


FORTRAN is calling DTFCP. 


17-19 


11-13 




Logic module address. If RPS is supported, OPEN 
changes this address to point to an RPS version of the 
logic module in the system virtual save area. CLOSE 
restores it. 


20 


14 




DTF type X'32' except in the case of disk assigned to 
units SYS000 to SYSnnn. In this case, a DTFCP open 
phase changes it to X'20'. 


21 


15 




Open indicators : X'02' Input, X'00' output, except 
for tapes assigned to SYS000 to SYSnnn when 
X'00' = Input and X'08' Is output. 
X'08' DISK=YES indicator. 









1 = no rewind, = rewind. 


22-28 


16-1C 




Filename (see byte 29). 


29 


ID 




Device type code : 
X'00' = 2311 
X'0r = 2314, 2319 
X'04' = 3330 
X'08' = 3340 general 
X'09" = 3340 35MB 
X'0A'= 3340 70MB. 


30-35 


IE -23 




File address for disk; block count If bit 7 of byte 16 


36-37 


24-25 




Volume sequence number or work area. 


38 


26 




Open switch 


39 


27 




Sequence number of current extent. 


40 


28 




Sequence number of last extent, or X'80' if 1442 punch. 


41 


29 




X'80 1 indicates request for standard label tape OPEN. 


42 


2A 




X'80' device is a 2560. 

X'40' DTF has been extended into the user virtual 

save area 
X'20" device is a DASD 
X'10' device is a tape 
X'08' device is a printer 
X'04' device is a punch 
X'02' device is a reader 
X'OT RPS is supported. 


43 


2B 




X'F3' device Is a DASD 
X'Fl' device is a reader 
X'FO" device is other type. 



DTFCP (D1SK=YES) (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


44 


2C 




1 


l=input, 0=output. 

l=eject needed for a reader punch; 0=no eject. 






2 


0=first pass, l=not first pass. 






3 


l=two I/O areas, 0=one I/O area. 






4 


1=2540 punch. 






5 


l=SY5LSTorSYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


1=TLBL is present and tape is labeled. 


45-47 


2D-2F 




IOAREA2 address. 


48-51 


30-33 




X'80000000'. 


52-53 


34-35 




Lower head limit. 


54-57 


36-39 




Extent upper limit. 


58-64 


3A-40 




BBCCHHR seek address. 


65-67 


41-43 




EOF address. 


68-71 


44-47 




Control bucket CCHH. 


72 


48 




Number of record per track for output, number of 
record per track +1 for input. 


73 


49 




X'OO' for output, X'01' for input. 


74-75 


4A-4B 




X'0020' for output, X'0018' for input for DASD 
X'0008" for 2560 and 5425 output. 
X'0000' for nondisk device. 


76-80 


4C-50 




CCHHR for count field. 


81 


51 




Key length. 


82-83 


52-53 




Data length. 


84-87 


54-57 




Instruction to load user I/O area address to I/O 
register. 


88-111 


58-6F 




Seek, search, TIC CCWs. 


112-119 


70-76 




CCW for DASD input and first CCWfor DASD output. 
This CCW can be used for other device if unit is not 
a DASD 


End-of-tc 


ble if DTF 


is define 


d for an input file 


120-127 


77-7? 




Second CCW for output. 


128-151 


80-97 




Verify CCWs for output. 


End-of-tc 


ble if DTF 


is define 


i for output file and DEVADDR does not equal SYSPCH. 


152-159 


98-9F 




2540 punch error recovery CCW 1 . 


160-167 


A0-A7 




2540 punch error recovery CCW 2. 


168-231 


A8-E7 




Reserved . 


When the 


CP open i 


nitializes 


the table and determines that the device is a 2540 punch, 


the follov 


/ing bytes 


in the tab 


e are changed : 


30 


IF 




X'FF' indicator to DTFCP open phases and logic module. 


32-35 


20-23 




Instruction to load user I/O area to I/O register. 


48-55 


30-37 




CCW. 


56-63 


38-3F 




2540 punch error recovery CCW 1 . 


64-71 


40-47 




2540 punch error recovery CCW 2. 


72-151 


48-97 




80-byte card image, savearea 1.. 


152-231 


98-E7 




80-byte card image, savearea 2. 



DTFCP (DISK=YES) (...Continued) 



Bytes 


Bits 


Function 


Dec | Hex 


When the CP open initializes the table and determines that the device is a 2560 or 
5425, the following bytes in the table are changed : 


32-35 

48-55 

56-63 

64 

65 


20-23 

30-37 

38-3F 

40 

41 




Instruction to load user I/O area to I/O register. 

First output CCW. 

Second output CCW. 

Stacker select character V for ASCII. 

Stacker select character W for EBCDIC. 



DTFCP (DISK=NO) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-0F 




CCB. 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


Not used. 






4 


DTF table address constants relocated by OPENR. 






5 


Not used. 






6 


1=ASCII (used only if DISK=YES), 0=EBCDIC 
(used only if DISK=YES). 






7 


FORTRAN is calling DTFCP. 


17-19 


11-13 




Logic module address. 


20 


14 




DTF type X'32' except in the case of tape assigned 
to units SYS000 to SYSnnn. In this case, a DTFCP 
open phase changes it to X'10'. 


21 


15 




Open indicators X'02' input, X'OO' output (except 
for tapes assigned to SYS000 to SYSnnn when it is 
X'00" input, X'08' output). 


22-28 


16-1C 




Filename (see byte 29). 


29 


ID 




Reserved for future use. 


30 


IE 




Indicator to DTFCP open phase and logic module. 
X'FF" for input files. 
X'00" for output files. 


31 


IF 




Reserved for future use. 


32-35 


20-23 




Instruction to load user's I/O area address into 
I/O register. 


36-37 


24-25 




Volume sequence number or work area. 


38 


26 




Open switch. 


39 


27 




Sequence number of current extent. 


40 


28 




Sequence number of last extent, or X'80' if 1442 punch. 


41 


29 




X'20'. 


42 


2A 




X'80' device is a 2560. 
X'40' device is a 5425. 
X'10' device is a tape. 
X'08' device is a printer. 
X'04" device is a punch. 
X'02' device is a reader. 


43 


2B 




X'Fl' device is a reader or tape. 
X'FO" device is other type. 


44 


2C 




1 


l=input, 0=output. 

l=eject needed for a reader-punch, 0= no eject. 






2 


l=not first pass, 0=first pass. 






3 


l=two I/O areas, 0=one I/O area. 






4 


1=2540 punch. 






5 


1=SYSLST or SYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


Reserved for future use . 


45-47 


2D-2F 




IOAREA2 address. 


48-55 


30-37 




CCW. 


End-of-t 


able if DTF 


is define 


d as output file and DEVADDR is not equal to SYSPCH. 



DTFCP (DISK=NO) (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


56-63 
64-71 
65-67 


38-3F 
40-47 
41-43 




2540 punch error recovery CCW 1 . 
2540 punch error recovery CCW 2. 
EOF address, input only. 


End-of -table if DTF is defined as input file 


72-151 
152-231 


48-97 
98 -E 7 




80-byte card image, save area 1. 
80-byte card image, save area 2. 


If the device is a 2560 or 5425, bytes 56 onward contain the following information. 


56-63 

64 

65 

66-75 

76-235 

236-237 

238-317 

318-319 


38-3F 

40 

41 

42-4B 

4C-EB 

EC-ED 

EF-13D 

13E-13F 




Second output CCW. 

Stacker select character V for ASCII. 

Stacker select character W for EBCDIC. 

Reserved for future use. 

First I/O area. 

Reserved. 

Second I/O area. 

Reserved. 



DTFCP (DISK=PARAMETER OMITTED) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-0F 




CCB 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


Not used. 






4 


DTF table address constants relocated by OPENR. 






5 


Not used. 






6 


1=ASCI1 (used only if DISK=YES), 0=EBCDIC 
(used only if DISK=YES). 






7 


Used by FORTRAN 


17-19 


11-13 




Logic module address. 


20 


14 




DTF type X'3T except in the case of tape assigned to 
units SYS000 to SYSnnn. In this case DTFCP open 
phase changes it to X'10'. 


21 


15 




Open indicators X'02" Input, X'00' output (except for 
tapes assigned to SYS0O0 to SYSnnn when it is X'00' 
input, X'08' output. 


22-28 


16-1C 




Filename. 


29 


ID 




Reserved for future use . 


30 


IE 




X'00" indicator to DTFCP open phases and logic 
module. 


31 


IF 




1 


l=input, 0=outpuf. 

l=eject needed for a read punch, 0=no eject. 






2 


l=not first pass, 0=first pass. 






3 


l=two I/O areas, 0=one I/O area. 






4 


1=2540 punch. 






5 


1=SYSLST or SYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


1=TLBL specified and tape is labeled. 


32 


20 




Open indicators. 


33-35 


21-23 




IOAREA2 address. 


36-39 


24-27 




Instruction to load user's I/O area address into 
I/O register. 


40-47 


28-2F 




CCW. 


End of to 


ble if DTF 


s def inec 


as output file and DEVADDR is not equal to SYSPCH. 


48-55 


30-37 




2540 punch error recovery CCW 1 . 


56-63 


38-3F 




2540 punch error recovery CCW 2. 


57-59 


39-3B 




EOF address, input only. 


End of fa 


o\e if DTF 


s defined 


as input file. 


64-143 


40-8F 




80-byte card image, save area 1. 


144-223 


90-1 3F 




80-byte card image, save area 2. 



DTFCP (DISK=PARAMETER OMITTED) 



Bytes 


Bits 


Function 


Dec | Hex 


For 2560 and 5425 bytes 48 onwards contain the following information : 


48-207 
208-209 
210-369 
370-371 
372-451 


30-CF 

D0-D1 

D2-171 

172-173 

174-1C3 




lOAREAl . 
Reserved 
IOAREA2. 
Reserved 
Compare area. 



DTF - Table Types 



DTF Type Code 






(Byte 20) 






of DTF Table 


DTF 


Description 


X'OO' 


DTFCD 


Combined files 


X'OT 


DTFPT 


Paper tape files 


X'02' 


DTFCD 


Reader and 3881 Optical Mark Reader files 


X'03' 


DTFCN 


Console 


X'04' 


DTFCD 


Punch files 


X'05' 


DTFCD 


Reader files on 2560, 5425 


X'07" 


DTFPR 


Printer files on 2560 


X'08' 


DTF PR 


Printer files 


X'09' 


DTFOR 


Optical Reader files except 3881 and 3886 files 


X'OA' 


DTFOR 


Optical Reader files (HEADER=YES) 


X'OB" 


DTFMR 


Magnetic Ink Character Recognition (MICR) 
and Optical Reader/Sorter files 


X'OC 


DTFDR 


3886 Optical Character Reader files 


X'10' 


DTFMT 


Magnetic tape workfiles 




DTFCP 


Magnetic tape workfiles (compiler). (Note I) 


X'll' 


DTFMT 


Nonstandard or unlabeld tape files 


X'12' 


DTFMT 


Standard labeled, output tape files 




DTFPH 


Standard labeled, output tape files 
(physical IOCS) 


X'13" 


DTFMT 


Standard labeled, input tape files (read backward) 


X'14' 


DTFMT 


Standard labeled. Input tape files (read forward) 


X'lA' 


DTFDU 


Diskette Input/Output Unit files 


X'20' 


DTFSD 


Sequential DASD workfiles a.id data files 




DTFCP 


DASD workfiles (compiler) 


X'21' 


DTFPH 


Sequential DASD files, MOUNTED=SINGLE 
(physical IOCS) 


X'22' 


DTFDA 


Direct access files 


X'23' 


DTFPH 


Direct access files, MOUNTED=ALL (physical 
IOCS) 


X'24' 


DTF IS 


Indexed sequential, LOAD file 


X'25' 


DTF IS 


Indexed sequential, ADD file 


X'26' 


DTF IS 


Indexed sequential, RETRVE file 


X'27' 


DTF IS 


Indexed sequential, ADDRTR f ile 


X'28' 


ACB 


Access Method Control Block for VSAM 


X'30' 


DTFCP 


Compiler file for DOS Version 1 (Note 1) 


X'31' 


DTFCP 


Compiler file for DOS Versions 2 onward 


X'32' 


DTFCP 


Compiler file for DOS Versions 2 onward (Note 2) 


X'33' 


DTFDI 


Device independent system unit files 


X'40' 


DTFBT 


Basic Telecommunication Access Method (BTAM) 
file (Note 3) 


X'50' 


DTFOT 


Queued Telecommunication Access Method 
(QTAM) file (Note 3) 


X'60' - X'67' 







DTF type is X'30' except for tape or DASD assigned to units SYS000 to 
SYSnnn. In this case, the DTFCP open phases change the DTF type to 
X'10' for tape workfiles, or X'20" for DASD workfiles. 



DTF - Table Types ( Continued) 

Notes (continued) 

2. DTF type is X'32' except for DASD assigned to units SYS000 to SYSnnn. 
In this case, the DTFCP open phases change the DTF type to X'20' for 
DASD workfiles. 

3. The following control unit codes are ORed into the low-order 4 bits of 
the DTF type code. 



2701 4 

2702 5 

2703 6 



RPS DTF/MODULE RELATIONSHIP 



VIRTUAL 
PARTITION 



T 

partition 

GETVIS 

area 

i 



TL 

partition 

GETVIS 

area 



RPS 
MOD 



RPS DTF-Extenfior 



RPS Channel Program 
(Variable length) 



Work space 



144 (X'90 1 ) 

Sector values (5) (ISAM only) 



172 (X'AC) 

Sector values (up to 4) (except ISAM) 



176 (X'BO") 180 (X'B4') 

Address of original channel program Address of original logic module 



72 Byte Register Save Area 



Additional Work Space 
256 bytes for DAM 
128 bytes for ISAM 
(This field is not present for SAM or Device Independence) 



CHAPTER IV 

DOS/VS SUPERVISOR CONTROL BLOCKS AND AREAS 



SUPERVISOR STORAGE ALLOCATION 



HARDWARE/SOFTWARE INTERFACE 

(PSW's, Logout Areas, etc.) 



TABLES AND CONSTANTS, that 
must be below 4K. Contained in FOPT macro 
(System Communications Region, Background 
Communications Region, etc.) 



CANCEL, GENERAL ENTRY, TASK SELECTION; 

these routines must be below 4K. Contained 

in FOPT macro. 

CHANNEL SCHEDULER, SVC ROUTINES AND 

AP ROUTINES; need not be below a certain 

boundary 



Some CONSTANTS that must be below 16K 



SAVE AREAS, OPTION TABLES, PIB TABLES, 
I/O TABLES, SYSTEM TASK BLOCKS, FOREGROUND 
COMM. REGIONS, etc. having Y-type address 
pointers in low storage. Must be below 32K 



I/O INTERRUPT HANDLER 



EXTERNAL INTERRUPT HANDLER 



TABLES, SAVE AREAS, TRANSIENT AREAS, 
having A-type address pointers in low storage 
(System Task Save Area, Boundary Box, PTA, 
LTA, etc.) 



FETCH ROUTINE 



CCW TRANSLATION ROUTINES 



PAGE MANAGEMENT ROUTINES 



CDLOAD, GETVIS and FREEVIS ROUTINES 



MACHINE CHECK HANDLER, 
CHANNEL CHECK HANDLER, 
RAS MONITOR, RTA 

PAGE MANAGEMENT TABLES, 
CCW TRANSLATION COPY BLOCKS 



Base reg ister 



R0,R11,R12,R13 



R14 



*Up to this point 
addressability should 
be possible with Y-type 
address constants 



R6 




R9 





R13,R14,R15 



R14 




R15 





SUPERVISOR CALLS 



*opMonal 



SVC 


Macro supported 


Function 


Dec 


Hex 








EXCP 


Execute Channel Program 


1 


1 


FETCH 


Fetch any phase 


2 


2 




Fetch a logical transient (B-transient) 


3 


3 




Force dequeue 


4 


4 


LOAD 


Load any phase 


5 


5 


MVCOM 


Modify supervisor communication region 
(if issued by MVCOM macro) 
Fetch another physical transient 
(if issued by a physical transient) 


6 


6 


CANCEL 


Cancel a problem program or task 


7 


7 


WAIT 


Wait for a CCB or TECB 


8 


8 




Transfer control to the problem program from a 
logical transient (B-transient) 


9 


9 


LBRET 


Return to a logical transient (B-transient) from 
the problem program after an SVC 8 


10* 


A 


SET 1 ME 


Set timer interval 


11 


B 




Return from a logical transient (B-transient) 


12 


C 




Logical AND (Reset) to second job control byte 
(displ. 57 in comm. region), or reset PCIL being 
condensed bit (displ. 59 in comm. region) 


13 


D 




Logical OR (Set) to second }ob control byte 
(displ. 57 in comm. region), or reset PCIL being 
condensed bit (displ. 59 in comm. region) 


14 


E 


EOJ 


Cancel job and go to job control for end of job step 


15 


F 


SYSIO 


Headqueue and execute channel program 


16* 


10 


STXIT(PC) 


Provide supervisor with linkage to user's PC 
routine for program check interrupts 


17* 


11 


EXIT(PC) 


Return from user's PC routine 


18* 


12 


STXIT(IT) 


Provide supervisor with linkage to user's IT routine 
for interval timer interrupts 


19* 


13 


EXIT(IT) 


Return from user's IT routine 


20* 


14 


STXIT(OC) 


Provide supervisor with linkage to user's OC routine 
for external or attention interrupts (operator comm.) 


21* 


15 


EXIT(OC) 


Return from user's OC routine 


22 


16 




Seize/Release system; 

Enable/disable external and I/O 

interrupts; 

Set key in user's PSW 


23* 


17 




Load phase header. Phase load address is stored at 
user's address 


24* 


18 


SETIME 


Set timer interval and provide supervisor with 
linkage to user's TECB, if any 



SUPERVISOR CALLS (. . . .Cont'd) 



SVC 




Function 


Dec 


Hex 


Macro Supported 


25* 


19 




Issue HALT I/O on a teleprocessing device, or 
HALT I/O on any device if issued by OLTEP. 
With multiprogramming, dequeue an unstarted 
OLTEP I/O request to a shared device 


26* 


1A 




Validate address limits 


27* 


IB 




Special HIO on teleprocessing devices 


28* 


1C 


EXIT(MR) 


Return from user's stacker select routine (MICR 
type devices only) 


29* 


ID 


WAITM 


Provide support for multiple wait macro 
WAITM 


30* 


IE 


QWAIT 


Wait for a QTAM element 


31* 


IF 


QPOST 


Post a QTAM element 


32 


20 




Reserved 


33 


21 


COMRG 


• Provide address of partition com. reg. 

• Force task select for system tasks 


34 


22 


GETIME 


Provides Time-of-Day and updates the DATE field 


35* 


23 


HOLD 


Hold a track for use by the requesting task only 


36* 


24 


FREE 


Free a track held by the task issuing the FREE 


37* 


25 


STXIT(AB) 


Provide supervisor with linkage to user's AB rou- 
tine for abnormal termination of a task 


38* 


26 


ATTACH 


Initialize a subtask and establish its priority 


39* 


27 


DETACH 


Perform normal termination of a subtask. It includes 
calling the FREE routine to free any tracks held by 
the subtask 


40* 


28 


POST 


Inform the system of the termination of an event 
and ready any waiting tasks 


41* 


29 


DEQ 


Inform the system that a previously enqueued 
resource is now available 


42* 


2A 


ENQ 


Prevent tasks from simultaneous manipulation of a 
shared data area (resource) 


43 


2B 




Reserved 


44* 


2C 




Provide supervisor support for external creation of 
unit check records by specific request 


45* 


2D 




Provide emulator interface 


46* 


2E 




Provide OLTEP with the facility to operate in 
supervisory state 


47* 


2F 


WAITF 


Provide support for multiple wait macro WAITF 
for MICR type devices 


48 


30 




Fetch a CRT transient 


49 


31 




Used by VTAM to init. ex&c.of channel program 


50 


32 




Reserved fcr LIOCS error diagnostic 


51 


33 




Return phase header 



SUPERVISOR CALLS (.... Cont'd) 



"optional 



SVC 


Macro supported 


Function 


Dec 


Hex 


52* 


34 


TTIMER 


Return the remaining time interval, or cancel 
a time interval 


53* 


35 




Used by VTAM to schedule user exit in applic.progr. 


54 


36 


FREEREAL 


Release page frames to selection pool 


55 


37 


GETREAL 


Provide interface between SDAID and PDAID 
initialization routine and page management routine, 
to create the PDAID alternate area or the SDAID 
buffer area 


56 


38 




Reserved 


57 


39 




Reserved 


58 


3A 




Provide interface between job control and the 
supervisor. Get real storage for real jobs 


59 


3B 




Provide interface between EOJ and the supervisor. 
Reset the storage key for virtual jobs 


60 


3C 


GETDADR 


Provide virtual address of location within I/O areas 
for ERP and CRT routines 


61* 


3D 


GETVIS 


Get storage in virtual partition 


62* 


3E 


FREEVIS 


Free storage in virtual partition 


63 


3F 


USE 


Use a resource 


64 


40 


RELEASE 


Release a resource 


65* 


41 


CDLOAD 


Load VSAM or CI phase 


66 


42 


RUNMODE 


Return mode in which program is running 


67* 


43 


PFIX 


Fix page(s) in real storage 


68* 


44 


PFREE 


Free page(s) in real storage 


69* 


45 


REALAD 


Return real address corresponding to a given virtual 
address 


70* 


46 


VIRTAD 


Return virtual address corresponding to a given real 
address 


71* 


47 


SETPFA 


Establish or terminate the linkage between the super- 
visor and a user page-fault appendage routine 


72* 


48 


GETCBUF/FREECBL 


JFJ Get or free copy buffer for IDAL or tape ERP 


73* 


49 


SETAPP 


Allow linkage to channel and appendage routines 


74* 


4A 




Fix page(s) in real storage for restart 


75* 


4B 


SECTVAL 


Calculate a sector value (disk dev. with RPS feature) 


76 


4C 




Initiate recording on SYSRCC file 


77 


4D 


TRANSCSW 


Returns the virtual address of a copied CCW 



SUPERVISOR CALLS (...Cont'd) 



♦optional 



SVC 


Macro supported 


Function 


Dec 


Hex 


78-84 


4E-5 


4 


Reserved 


85* 


55 


RELPAG 


Release contents of one or more pages 


86* 


56 


FCEPGOUT 


Force a page-out of one or more pages 


87* 


57 


PAGE IN 


Page-in one or more pages 


88* 


58 


TPIN 


Start TP Balancing 


89* 


59 


TPOUT 


Stop TP Balancing 


90* 


5A 


PUTACCT 


Provide interface with POWER/VS for 
additional account information (by user) 


91* 
92* 


5B 
5C 


XECBTAB 


Provide interface with POWER/VS for 
standard account information (DOS/VS) 
XECB table manipulation 
(DEFINE, DELETE, CHECK an entry ) 


93* 


5D 


XPOST 


Post an XECB 


94* 


5E 


XWAIT 


Wait on an XECB 



COMMAND CONTROL BLOCK (CCB) 



and 



CCW 

Address 

inCSW 



Option 

Sense 

CCW 



Byte(s) 


Description 


0-1 Used for residual 
Count. 


Byte 1 is also used by the BTAM Channel End 
Appendage for fix requests. 


2-3 Transmitting in- 
formation between 
Physical IOCS & 
Problem Program 


Byte 2 


Set on by: 


BitO: 
Bit 1: 


Traffic Bit (Wait) 
(Note 5) 

End of File(/*or/&) 
3211-UCSB Parity Check (Line Com- 
plete) (Note 2) 


PIOCS* 
PIOCS 




Bit 2: 


Unrecoverable I/O error 


PIOCS 




Bit 3: 


Accept unrecoverable I/O error 


Pr.Pr.** 




Bit 4: 


Return DASD Data Checks, 3540 Data 
Checks, 2671 errors, or 1017/1018 
errors to the user; indicate action- 
type messages for DOC; Return 5425 
not ready. 


Pr.Pr. 




Bit 5: 


Post at Device End (Note 5) 


Pr.Pr. 




Bit 6: 


Return Tape Read Data Check; 
1018 or 2560 Data Check;2520,2540, 
2560,3881 or 5425 Equipment Check; 
Accept 3504,3505 or 3525 Perm. Error; 
DASD Data Checks on Read or Verify 
Command on 3203, 3211, or 5203 
Passback Requested. 
(Notes 3,6 and 8) 


Pr.Pr. 




Bit 7: 


User Error Routine (Note 10) 


Pr.Pr. 


Byte 3 


Set on by 


BitO: 


DASD Data Check in Count Area; 
Permanent Error for 3330 or 3340; 
MICR-SCU Not Operational; 1287/ 
1288 Data Check; 3203, 3211, or 
5205 Print Check/Equipment Check; 
3540 Special Record Transferred 


PIOCS 




Bit 1: 


DASD Track Overrun;MICR Interven- 
tion required; 1287-Keyboard Correct- 
ion in Journal Tape Mode;1017- 
Broken Tape;321 1 -Print Quality/ 
Equipment Check. 


PIOCS 




Bit 2: 


DASD End of Cylinder;MICR-(Note4) 
1287/1288-Hopper Empty in Document 
Mode. 32 11/2245 Line Position Error. 
(Note 7) 





COMMAND CONTROL BLOCK (CCB) (. . . .Cont'd) 



Transmi 
sion infor 
motion 



CSW 
Status 



Type 
Code 



CCW 
Address 



fes 



CCW 
Address 
in CSW 



Option 

Sense 

CCW 



Byte(s) 


Description 


2-3 (....Cont'd) 


Byte 3 


Set on by 


Bit 3: 


2520,2540,3881-Equipment Check;256( 


PIOCS 






.3203,5203,5425 Data Check/ 








Equipment Check; Tape Read Data 








Check; DASD-Any Data Check; 








1287-Equipment Check; 1017/1018 








Data Check; 3211-Print Check/ 








Data Check; 3504,3505,3525 Perm. 








Error (Note 8); 3540 Diskette Data 








Check. 






Bit 4: 


Non-Recovery Questionable Condition: 
Card- Unusual Command Sequence 
DASD- No Record Found 
1287/1288- Document Jam or Torn 
Tape; 3211- UCSB Parity Check(Com- 
mand retry); 5425 Not Ready. 


PIOCS 




Bit 5: 


No Record Found Condition(Retry on 
231 1,2314,2319,3330 or 3340) 


Pr.Pr. 




Bit 6: 


Carriage Channel 9 Overflow or Veri- 
fy Error for DASD; 1287-Document 
Mode-Late, Stacker Select; 1288-End 
of Page 


PIOCS 




Bit 7: 


Command Chaining, Retry from the next 
CCW to be executed 


Pr.Pr. 


4-5 CSW Status Bits 


Byte 4 


(Note 1) 


Byte 5 


Bit 0: 


Attention 


Bit Ch Program Controlled 




1: 


Status Modifier 


Interruption 




2: 


Control Unit End 


1: Incorrect Length 




3: 


Busy 


2: Program Check 




4: 


Channel End 


3: Protection Check 




5: 


Device End 


4: Channel Data Check 




6: 


Unit Check 


5: Channel Control Check 




7: 


Unit Exeption 


6: Interf. Control Check 
7: Chaining Check 


6-7 Type Code 

and Logical Unit 


Byte 6 


X'Ou' 


Original CCB 




X'2u' 


Translated CCB 




X'4u' 


BTAM request original CCB 




X'6u' 


BTAM request translated CCB 




X'8u' 


User-translated CCB in virtual partition 




Note: 


Any one of the above incremented by X'10'(bit 
3 on) indicates automatic switching to the be- 
ginning of the next cylinder at End of Cylinder 



COMMAND CONTROL BLOCK (CCB) (. . . .Cont'd) 



Transmis 
sion infor 
motion 



CSV/ 
Status 
Bits 



Type 
Code 



Reserved 
for 

logical 
IOCS 



CCW 
Address 



Reserved 
for 

physical 
IOCS 
12 



CCW 
Address 
inCSW 
13 15 



Option. 

Sense 

CCW 



Byte(s) 


Description 


6-7 ( Cont'd) 


Byte 6 (Cont'd) 

u: 0= The address in byte 7 refers to a System 
Logical Unit. 
1= The address in byte 7 refers to a Program- 
mer Logical Unit. 


Byte 7 


Hexadecimal representation of SYSnnn: 
SYSRDR = 00 SYSREC = OA 
SYSIPT = 01 SYSCLB = OB 
SYSPCH = 02 SYSVIS = 0C 
SYSLST = 03 SYSCAT = 0D 
SYSLOG = 04 SYSOOO = 00 
SYSLNK = 05 SYSOOl = 01 
SYS RES = 06 SYS002 = 02 
SYSSLB = 07 _J 
SYSRLB = 08 ,.,""" 
SYSUSE =09 (Note9) 


8 Reserved for 
Logical IOCS 


Buffer Offset: 

ASCII Input Tapes X'00'-X'63' 

ASCII Output Tapes Fixed X'00* 
Variable X'00' or X'04' 
Undefined X'00' 


9-11 CCW Address 


Virtual or real address of CCW associated with this CCB 
depending on byte 6: 

Real address if byte 6= X'2u',X'6u',or X'8u' ; 
Virtual address if byte 6= X'Ou", or X'4u". 


12 Reserved for 
Physical IOCS 


X'80' CCB being used by ERP 

X'40' Channel Appendage Routine present 

X'20' Sense Information desired (Note 10) 

X'10' Message writer 

X'08' EU Tape Error 

X'04' OLTEP Appendage available 

X'02' Tape ERP Read Opposite Recovery 

X'01' Seek Separation 


13-15 CCW Address in 
CSW 


Virtual Address of CCW pointed to by CSW at Channel 
End (if byte 6= X'8u', it is the real address) or address 
of the Channel End Appendage Routine for TP devices, 
VSAM or POWER. 


16-23 Optional Sense 
CCW 


8 bytes appended to the CCB when Sense Information is 
desired. 



COMMAND CONTROL BLOCK (CCB) (. . . .Cont'd) 

Note 1: Bytes 4 and 5 contain the status bytes of the Channel Status Word(Bits 32-47). 
If byte 2, bit 5 is on and device end results as a separate interrupt, device end 
will be OR-ed into CCB byte 4. 

Note 2: Indicates/* or/& statement on SYSRDR or SYSIPT. 
Byte 4, bit 7 (unit exception) is also on. 

Note 3: DASD data checks on count not returned. 

Note 4: For 1255/1259/1270/1275/1419, disengage. For 1275/1419D, I/O Error is 
external interrupt routine (Channel data check or bus-out check). 

Note 5. The traffic bit (Byte 2, bit 0) is normally set on at channel end to signify that 
the I/O was completed. If byte 2, bit 5 has been set on, the traffic bit and 
bits 2 and 6 in byte 3 will be set on at device end. Also see Note 1 . 

Note 6: 1018 ERP does not support the Error Correction Function. 

Note 7: This error occurs as an equipment check, data check or FCB parity check. 

For 2245, this error occurs as a data check or FCB parity check. 
Note 8: For 3504,3505,3525 input or output files using ERROPT, byte 3-bit 3 is set 

on if a permanent error occurs. Byte 2-bit 6 is set on to allow you to accept 

permanent errors. 

Note 9: SYSnnn= 255-(Number of partitions x 14). 

Note 10: If user Error Routine is specified and the user needs the sense info to further 
process the error, byte 12-bit 2 must also be set. Otherwise the 
supervisor error routine will mask off the status on return and the sense info is 
not available. 



EVENT CONTROL BLOCK (ECB) 



Reserved 


Reserved 






Reserved 


1 


2 3 


1 









X'80' : Normal termination of subtask 
X'CO': Abnormal termination of subtask 



RESOURCE CONTROL BLOCK (RCB) 





Unused 




ECB Address 



Byte : X'FF' if resource is ii 
Bytes 1-3 : Unused 



; 5 6 7 

;e, X'OG" if resource is not in use 



Byte 4 : Bit 0= 1 
= 



Another task waiting for the resource 
No other task waiting for the resource 



Bytes 5-7 : ECB address of current resource owner 



DENSITY DATA 



Density 
(Bytes per inch) 


Parity 


Convert 
Feature 


Translate 


SS Code * 


200 


odd 


on 


off 


10 


200 


odd 


off 


off 


30 


200 


odd 


off 


on 


38 


200 


even 


off 


off 


20 


200 


even 


off 


on 


28 


556 


odd 


on 


off 


50 


556 


odd 


off 


off 


70 


556 


odd 


off 


on 


78 


556 


even 


off 


off 


60 


556 


even 


off 


on 


68 


800 


odd 


on 


off 


90 


800 


odd 


off 


off 


B0 


800 


odd 


off 


on 


B8 


800 


even 


off 


off 


A0 


800 


even 


off 


on 


A8 


800 


dual density nine-track 




C8 


1600 


dual density nine-track 




CO 


6250 


dual density nine-track 




DO 


800 


single density nine-track — 




CO 


1600 


single density nine-track — 




CO 


6250 


single density nine-track — 




DO 



* Refer to PUS Table, byte 5 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (SYSCOM) 







4 
4 


8 
8 


OA 
10 


OC 
12 


10 
16 


14 
20 


18 
24 


Address of 
Error Block 


Address of 
Attention Exit 


Address of 

Operator 

Option 

Cancel Exit 


Address of 

Operator 

Request 

Cancel Exit 


Address of 
SYSRES PUB 


Address of 
Fetch Routine 


Address of 
I/O Interr. Routine 


Address of 
Ext.lnterr.Routine 


xxxx 


xxxx 


XX 


XX 


xxxx 


xxxx 


xxxx 


xxxx 



1C 
28 


20 
32 


24 
36 


25 
37 


28 
40 


2A 
42 


2C 

44 


2E 

46 


30 
48 


34 
52 


Address of 

Logical Transient 

Area 


Address of 

1st byte of 

Problem Program 

Area 


Free 

List 

Pointer 


Address 

of 
Channel 


Number of 
Channel 
Queue 
Entries 


Length of 
One Error 

Queue 

Entry 


Number of 
Partitions 


Not used 


Address of 
Channel Buckets 


Address of 
CRT Table 


xxxx 


xxxx 


x 


xxx 


XX 


XX 


XX 


XX 


XXXX 


xxxx 



38 
56 


3C 
60 


40 
64 


44 
68 


46 
70 


48 
72 


AC 
76 


4D 
77 


50 
80 


Address of 
SAB Table 


Address of 

Channel Control 

Table 


Flags and 

Switches 

(See expansion ) 


System Task 

Selection 

Control Field 


Address of 

Task 
Selection 


Address of 
PD Area 


TH 

Free 

List 

Pointer 


Address 

of 
TH Table 


Address of 

Timer Request 

Table 


xxxx 


xxxx 


xxxx 


XX 


XX 


XXXX 


x 


xxx 


xxxx 



* See end of tables for further explanation 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (....Cont'd) 



54 
84 


58 
88 


5A 
90 


5C 
92 


60 
96 


64 
100 


68 
104 


6C 
108 


70 
112 


Address of 
AB Table 


Key of Task 

owning LTA 

(UK) 


Key of Task 
running 
(TIK) 


Address of 
POWER/ VS 
partition 


Address of 

VTAM Address 

Vector Table 


Address of 
RF Table 


Address of 
EU ECB Table 


Address of 
OLTEP bucket 


Address of 

RAS Linkage 

Area 


xxxx 


XX 


XX 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 



74 
116 


78 
120 


7C 
124 


80 
128 


84 
132 


88 
136 


8C 
140 


90 
144 


Address of 

ASCII 

Translate Table 


Address of 

PUB Ownership 

Table 


Address of 
Job Accounting 
Common Table 


Base Address of 

Page Management 

Routine 


Base Address of 
Channel Program 
Translation Routine 


Address of 

SDAID 
Save Area 


Address of 
Line Mode Table 


Address of VSAM 

Communication 

Area 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 



94 
148 


98 
152 


9C 
156 


A0 
160 


Al 
161 


A2 
162 


A3 
163 


A4 
164 


A5 
165 


A6 
166 


A7 
167 


Address of PTA 


Address of first 
System Task Block 


Address of Task 

Block of Active 

System Task 


1 byte for 
Alignment 


Pointer to 
RAS Task 
Block 


Pointer to 

PMGR Task 

Block 


Pointer to 

SUPVR Task 

Block 


Pointer to 

CRT Task 

Block 


Pointer to 

ERP Task 

Block 


Pointer to 
PAGEIN 
Task Block 


Reserved 
(9 X'00') 


xxxx 


xxxx 


xxxx 


x 


x 


x 


x 


x 


x 


x 


xxxxxxxxx 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . .Cont'd) 



BO 
176 


B4 
180 


B8 
184 


BC 
188 


BE 
190 


CO 
192 


CB 
203 


CC 

204 


CE 
206 


Not used 


Address of 
MVCFLD 


TRTMSK 
pointer 


TP Balan- 
cing 
Parameter 


Not used 


Repositioning Information 
for MFCM ERP 


Number of 

Error Queue 

Entries 


Length of 
PUB Table 
in bytes 


Number of 
Active 
Partitions 


xxxx 


xxxx 


xxxx 


XX 


XX 


XXXXXXXXXXX 


X 


XX 


XX 



DO 
208 


D4 
212 


D8 
216 


DC 
220 


E0 
224 


E4 
228 


E8 
232 


EC 
236 


Address of 
Segment Table 


Address of 
Page Frame Table 


Address of 

Page Frame Table 

Extension 


Address of 
Boundary Box 


Address of 
DPD Table 


Reserved 


Address of 
VIRTAD Routine 


Address of 
End of Real Storage 


XXXX 


XXXX 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 



F0 
240 


F4 
244 


F5 
245 


F8 
248 


FC 
252 


100 
256 


104 
260 


Address of 
Fetch Table 


SVA Flag 
(see expansion) t 


Address of 
SVA 


Address of 
System GETVIS 


Address of 

RPS 

local directory list 


Address of 

RPS sector 

calculation routine 


Address of 
System Code 
patcharea start address 


xxxx 


X 


XXX 


XXXX 


XXXX 


XXXX 


XXXX 



See end of tables for further explanatioi 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (...Cont'd) 



Expansion of SYSCOM Flog Bytes 



Byte 
Dec Hex 


Description 


64 40 


Reserved for RMS in Model 1 15 and 125 






X'80' 


RMSR for channel attached devices, tapes and TP dev 


ces 




X'40' 


Full RMS support (MCAR/CCH and RMSR) 






X'20' 


MCAR/CCH support 




65 41 


X'80' 


Initial selection of ERP 






X'40' 


Reserved 






X'20' 


Timer interrupt pending 






X'10' 


MICR Stacker-select active 






X'08' 


Invalid address during fetch 






X'04* 


SIO routine entered after interrupt 






X'02' 


TP in progress 






X'01' 


IPL in progress 




66 42 


X'80' 


Initial RAS request 






X'40' 


RAS WAIT request outstanding 






X'20' 


RAS IPL in progress 






X'10' 


Reserved 






X'08' 


POWER/VS supported 






X'04" 


POWER/VS initialized 






X'02' 


GETREAL for SDAID or PDAID in progress 






x'or 


Fetch for system task in progress (used by PDAID 's) 




67 43 


X'80' 


Reserved 






X'40' 


ECPREAL supported 






X'20' 


VSAM supported 






X'10' 


Reserved 






X'08' 


Reserved 






X'04' 


TP Balancing reset request 






X'02' 


Batch deactivated 






X'01' 


Reserved 




244 F4 


SVA Flag 






X'80' 


Do not test for warm start copy of SVA 






X'40' 


SDL active 






X'20' 


No "Set SVA" or "Set SDL" allowed 






X'10' 


Build of DSL in progress 






X'08' 


SDL overflow 






X'04' 


Reserved 






X'02' 


Reserved 






X'01' 


Reserved 





SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . .Cont'd) 
LAYOUT OF SYSTEM TASK SELECTION CONTROL FIELD 



Byte 
Dec Hex 


Des 


:ription 


66 44 


Always zero 




69 45 


SELECT byte : 






X'OO' No system task act! 


ve 




X'OT RAS active 






X'02' PMGR active 






X'03' SUPVR active 






X'04' CRT active 






X'05' ERP active 






X'06' PAGE IN active 





Note : The address of SYSCOM can be found at fixed lo( 



nX'80" -X'83'. 



PARTITION COMMUNICATION REGION 







8 
8 


OA 
10 


OC 
12 


17 
23 


18 
24 


20 
32 


24 
36 


28 
40 


2C 

44 


Date 


Address of 
PPBEG 


Address of 
EOSSP 


Problem Program Use 


UPSI 
Byte 


Job Name 


Highest 

Storage 

Address of 

the Partition 


End Address of 

Last Phase 

Fetched or loaded 


Address of upper- 
most Byte of Phase 
with highest 
Ending Address 


Label 
Area 


xxxxxxxx 


XX 


XX 


xxxxxxxxxxx 


x 


xxxxxxxx 


xxxx 


xxxx 


xxxx 


XX 



2E 
46 


30 
48 


34 
52 


35 
53 




36 
54 


37 

55 


38 
56 


39 
57 


3A 
58 


3B 
59 


3C 
60 


3E 
62 


PIK 


End of 
Virtual 
Storage 
Address 


Machine 

Configur. 

Byte 


System 

Configur. 

Bytel 


Standard 
Language 
Translator 
I/O Options 


Dump, Log, 

RELLDRand 

ASCII 

Options 


Job Control 
Byte 


Control 
Byte 


Language 

Translator 

Control 

Byte 


Job Duration 
Indicator Byte 


Disk Address 

of 
Label Cylinder 


Address 

of 
FOCL 


XX 


xxxx 


x 


x 


x 


x 


x 


x 


x 


x 


XX 


XX 












N Job Control Switches— 











40 
64 


42 
66 


44 
68 


46 
70 


48 
72 


4A 
74 


4C 
76 


4E 
78 


4F 
79 


58 
88 


5A 
90 


5C 
92 


Address 

of 
PUBTAB 


Address 

of 
FAVP 


Address 

of 
JIBTAB 


Address 

of 
TEBTAB 


Address 
of 
FICL 


Address 

of 

NICL 


Address 

of 
LUBTAB 


Line Count 

for 

SYSLST 


System Date 


LIOCS 

Comm. 
Bytes 


Address of 1st 
Part of 
PIB Table 


ID Number of 

last Checkpoint 

or DASDFP 

Indicator 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


x 


XXXXXXXXX 


XX 


XX 


XX 



Note: A communication region exists for each partition supported by the system 

The address of the communication region of the active partition is in fixed loc. X'14' - X'17' 



PARTITION COMMUNICATION REGION (....Cont'd) 



5E 
94 


60 
96 


62 

98 


64 
100 


66 
102 


68 
104 


6A 
106 


6C 
108 


6E 
110 


Job Zone 
Minutes 


Address of Disk 
Information 
Block (DIB) 


Reserved 


Address of PC 
Option Table 
less 8 bytes 


Address of IT 
Option Table 
less 8 bytes 


Address of OC 
Option Table 
less 8 bytes 


Key of Program 

with 
Timer Support 


Reserved 


Logical 

Transient Key 

(LTK) 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


XX 



70 
112 


74 
116 


78 
120 


7C 
124 


7E 
126 


80 
128 


84 
132 


86 
134 


87 
135 


Address of 
SYSPARM 


Address of 

J. A. Partition 

Table 


Address of 
TOD clock 
Common Area 


Address 
of 2d part 
of PIB Table 


Address 

of MICR DTF 

Table(PDTABB) 


Address 

of QTAM 

Vector Table 


Address 

of BG Comm. 

Region 


Option 
Indicator 


System Configuration 
Byte 2 and RMSR 
Open Flag Byte 


XXXX 


XXXX 


XXXX 


XX 


XX 


XXXX 


XX 


x 


x 



88 
136 


8C 
140 


8D 
141 


8E 
142 


8F 
143 


97 
151 


98 
152 


9F 
159 


Reserved for 
compatability 
reasons 


Standard Options 


Temporary 
Options 


Disk 
Configuration 


Catalog 
Procedure Name 


Switch for 
Catalog 
Procedure 


JCL 

Statement 
Name 


81 bytes 
SYSIN Indicator 


xxxx 


x 


x 


x 


xxxxxxxx 


x 


xxxxxxx 


x 



Note: A communication region exists from each partition supported by the system. 

The address of the communication region of the active partition is in fixed loc. X'14'-X'17'. 



PARTITION COMMUNICATION REGION (...Cont'd) 



AO 
160 


A4 
164 


A5 
165 


A6 
166 


Address of 
POWER/VS 
Partition 
Control Block 


POWER/VS 
Flag Byte 1 


POWER/VS 
Flag Byte 2 


Reserved 


xxxx 


x 


x 


XX 



Note: A communication region exists for each partition supported by the system 

The address of the communication region of the active partition is in fixed loc. X'14' - X'17' 



PARTITION COMMUNICATION REGION ( Cont'd) 

Key to Communication Region displacement 



MM/DD/YY or DD/MM/YY either set permanently by the job control date 
statement, or updated every time a GETIME macro is issued when time-of-day 
support is provided. Format controlled by BGCOMREG + 53. 
(System Configuration Byte, date convention bit 0) 

Address of the problem program area. -v Maintained for compatibility; 

ajj r il l • • rj. Li L correct value found in SYSCOM 

Address of the beginning of the problem ' 

program area. Y(EOSSP) equals Y(PPBEG) 



at displacement hex 20 



12 User area. If seek separation option is specified, bytes 12 and 13 are used at 

I PL time for the address of the seek address block. 

23 User program switch indicator. 

24 Job name set by the Job control program from information found in the 
job statement. 

32 Address of the uppermost byte available to the problem program, that is either 

the address of the uppermost byte of the partition as determined during pro- 
cesssing of the ALLOC or ALLOCR macro or statement, or the end address of 
the area specified by the SIZE parameter in the EXEC statement. 

36 Address of the uppermost byte of the last phase of the problem program 

fetched or loaded. Not filled in when phase is in SVA. 

40 Highest ending main-storage address of all phases having the same 

first four characters as operand on the EXEC statement. 
For the phase $LNKEDT this field is not filled in. 
The address value may be incorrect if the program loads any of 
these phases above its link-edited origin address. If the EXEC 
statement has no operand, job control places in this location the 
ending address of the program just link-edited. 

44 Length of the problem program label area. 

46 Partition Identification Key (PIK). The low order byte identifies the active 

partition. Only significant for BG communication region. 

48 End address of virtual storage. 

52 Machine Configuration Byte (Values set at supervisor generation time) 

Bit 0: Always set to indicate standard storage protect 
1: 1= Decimal feature (always set) 
2: 1= Floating point feature 

0= No floating point feature 
3: 1= Physical transient overlap option 

0= No physical transient overlap option 
4: Always set to indicate standard timer feature 
5: 1= Channel switching device 

0= No channel switching device 
6: 1= Burst mode on multiplex channel support 

0= No burst mode on multiplex channel support 
7: Indicates MCH/CCH in system 



PARTITION COMMUNICATION REGION (. . .Cont'd) 



Key 


to Commu 


nication Region displacement 


53 


System 


Configuration byte 






Bit Ch 

1: 


1=DDMMYY , n t L . ... L L L . L . , c -rr,i^ 
r. ...mnw (Date convention bit set at generation time by STDJC) 
0= MMDDYY 
1= Multiprogramming environment (2 or more partitions) 






0= One partition o 


nly. 




2: 


1= DASD file-prot 


2ct supported 






0= No file-protect 


support for DASD 




3: 


1= DASD SYSIN - 


SYSOUT 






0= No DASD SYSIN - SYSOUT 




4: 


1= Teleprocessing 








0= No teleprocessi 


ng 




5: 


1= Two or more pa 


titions 






0= One partition only 




6: 


1= Asynchronous processing 
0= No asynchronous processing 




7: 


1= Track Hold 
0= No Track Hold 
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This byte contains the standard language translator I/O options (set by 




STDJC 


macro). 






BitO. 


DECK option 


1= yes, output object modules on SYSPCH 




1: 


LIST option 


l=yes, output source module listings and 
diagnostics on SYSLST 




2: 


LISTX option 


l=yes, output hexadecimal object module 
listings on SYSLST (compilers only) 




3: 


SYM option 


1= yes, output symbol tables on SYSLST/SYSPCH 




4: 


XREF option 


1= yes, output symbolic cross-reference list on 
SYSLST 




5: 


ERRS option 


1= yes, output diagnostics on SYSLST (compilers 
only) 




6: 


CHARSET option 


1= 48, input on SYSIPT is 48 or 60 character set 




7: 


Reserved 
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This byte contains the standard supervisor options for abnormal EOj, 




Relocating Loader and Control statement display and the indicator for the 




presen 


ce of the ASCII-EBCDIC and EBCDIC-ASCII translation tables. 




BitO: 
1: 


Always on 
DUMP option 
(DUMP=YES or 








DUMP=PART) 


1= yes, dump registers and storage on SYSLST 




2: 




1= partition in wait state, because a volume 
is to be mounted 




3: 


LOG option 


1= yes, list all control statements on SYSLST 




4: 




1= dummy, device search in progress; do not 
enter ERP 




5: 


Not used 






6: 


Relocating Load 








option 


l=yes, Relocating Loader supported 




7: 


ASCII option 


1= yes, ASCII supported 
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Job Control byte 






BitO: 


1= Job accounting 


Interface (JA) not supported 






0= Job accounting 


Interface (JA) is supported 




1: 


1= Return to caller 


on LlOCS disk open failure 






0= Do not return to caller on LlOCS open failure 




2: 


1= Job control input from SYSRDR 
0= Job control input from SYSLOG 



PARTITION COMMUNICATION REGION (....Cont'd) 
Key to Communication Region displacement 



56 Job Control byte (. . . .Continued) 

Bit 3: 1= Job control output on SYSLOG 

0= Job control output not on SYSLOG 
4: 1= Cancel [ob 

0= Do not cancel job 
5: 1= Pause at end-of-job step 

0= No pause at end-of-[ob step 
6: 1= SYSLOG is not a console printer-keyboard or DOC 

0= SYSLOG is a console printer-keyboard or DOC 
7: 1= SYSLOG is assigned to the same device as SYSLST 

0= SYSLOG is not assigned to the same device as SYSLST 

57 Linkage control byte 

Bit 0: 1= SYSLNK open for output 

0= SYSLNK not open for output 
1: 1= Update of Second Level Directory and RAS loadlist in progress 

(interface between $MAINDIRand Supervisor) 
2: 1= Allow EXEC 

0= Suppress EXEC 
3: 1= Catalog linkage editor output 

0= Do not catalog linkage editor output 
4: 1= Supervisor has been updated 

0= Supervisor has not been updated 
5: 1= PCIL open in progress 
6: Update of System Core Image Library in progress 

(interface between $MAINDIRand Supervisor) 
7: Check automatic condens limits at end of job 

(interface between Librarian and Job Control) 

58 Language processor control byte. This is a set of switches used to specify non- 
standard language translator options. The switches within the byte are control - 
led by job control OPTION statements and when set to 1, override standard 
options. The format of this byte is identical to the standard option byte (dis- 
placement 54) with one exception: Bit 7 in this byte is used to indicate to 
LIOCS that the rewind and unload option has been specified. 

59 Job duration indicator byte 

1= Within a job condition 

0= Outside a job condition 

1= Dump or partition dump on an abnormal EOJ condition (see byte 141 

0= No dump on abnormal EOJ 

~ . . ,._ , Set by attention routine for Job Control 

0= No pause at EOJ ' 

1= Job control output on SYSLST 

0= Output not on SYSLST 

1= Job is being run out of sequence with a temporary assignment for 

SYSRDR 

0= Conditions for 1 -setting not met 

■ = PCIL is being condensed 

0= PCIL is not being condensed 

1 = //DATE statement processed for current job 

0= No //DATE statement processed for current job 

1= Batch command just issued 

0= Condition for 1 -setting did not occur 



PARTITION COMMUNICATION REGION (....Cont'd) 
Key to Communication Region displacement 



60 Binary disk address of the volume label area (label cylinder) . 

j. As illustrated (For detailed figures see index) . 

78 Set to the value nn specified in the LINES= nn parameter of the STDJC macro. 

79 The format of the system date contained within this field is determined by the 
IPL program from information supplied in the date convention bit (displacement 
53). Bytes 85-87 contain the day count. 

88 Bytes reserved for use by LIOCS. Transient dump programs insert a key to in- 

dicate to the LIOCS end-of-volume routine, SSBCMT07, that it was called by 
a B-fransient. 

90 Address of the first part of the program information block (PIB) table. 

92 ID number of the last checkpoint. Byte 92 is also the temporary indicator of 

file protected DASD. Bits 0-6 correspond to channels 0-6. A bit ON means 
DASDFP for that channel . Bit 7 indicates 2321 DASDFP support. 
Byte 93 is used at IPL time by PIOCS. Bit 0: 1= 3330 file protection. 
Bitl: 1= 3340 file protection. 

94 Job zone for Time of Day. If ZONE= EAST, value is positive; if ZONE = 

WEST, value is negative. 

96 Address of disk I/O position data. This is the starting address of the disk infor- 

mation block (DIB) table. 

98 Reserved. 

100 Address for PC, IT, and OC option tables. Contain zero if PC, IT or OC 

104 option not specified. 

106 If no interval timer support : X'0000' . If It.terval timer support : Key of 

program with interval timer support. 
108 Reserved 

1 10 Logical Transient Key (LTK) contains the same value as the PIK (PID)(Displace- 
ment 46) when the logical transient is requested. When the transient area is 
not in use, LTK is equal to zero. The SVC2 routine sets the LTK. 
The SVC11 routine resets the LTK. (only significant in BG communication reg.) 

1 12 Address of SYSPARM field. 

1 16 Address of Job Accounting partition table. 

120 Address of the Time of Day Clock common area. 

124 Address of second part of program information block (PIB) table. 

126 Address of PDTABB, table of DTF addresses for MICR support. 

128 Address of QTAM vector table (IJLQTTAD). 

132 Address of background communications region. 



PARTITION COMMUNICATION REGION (....Cont'd) 
Key to Communication Region displacement 
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Option Indicator byte 




Bit 0. Reserved 

1: 1=EU interface active 

0=EU interface inactive 
2: 1= Teleprocessing request 

0- No teleprocessing request 
3: 1= Supervisor support for tape 

0= Supervisor does not support tape 
4: Reserved 
5: 1= RETAIN support generated 

0= RETAIN support not generated 
6: 1= Linkage to Channel End Appendage Routine allowed 

0= Linkage to Channel End Appendage Routine not allowed 
7: 1= GETVIS function has been initiated 

0= GETVIS function has not been initiated 
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System Configuration byte 2 and RMSR Open Flag byte 




Bit 0: 1= PCI L supported 

1: 1= TOD clock supported 

2: 1= PFIX macro supported 

3: 1= Fetch SSBOPEN by SJOBCTU 

4: 1= Fetch SSBOPEN by SJOBCTLD 

5: 1= Fetch $$BOPEN by SJOBCTLJ for WAITM 

6: 1= QTAM supported 

7: 1= RPS supported 
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Pointer to Option table In SYSCOM. Reserved for compatibility reasons 
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Standard Option byte 




Bit 0: 1= EDECK Standard Option 
1: 1 = ALIGN Standard Option 
2: 1= PARTDUMP Standard Option 
3-6: Not used 

7: 1 = ACAN CE L S tandard Opt ion 


141 


Temporary Option byte 




Bit 0: 1= EDECK Temporary Option 
1: 1= ALIGN Temporary Option 
2: 1= PARTDUMP Temporary Option 
3-5: Not used 

6: SUBLIB=DF Temporary Option 
7: 1= ACANCEL Temporary Option 


142 


Disk Configuration Byte 




Bit 0-4: Not used 

5: 1=3340 supported 
6: 1=3330 supported 
7: Always 1; indicates 2311 and 2314/2319 supported 


143 


Catalogued Procedure Name 


151 


Interface byte for Catalogued Procedures 




Bit 0: 1= Procedure being executed 
1: 1= Overwrite processing 
2: 1= Procedure with data 
3: 1= Overwrite request for Job Control 



PARTITION COMMUNICATION REGION (....Cont'd) 
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Interface byte for Catalogued Procedures (Cont'd) 

Bit 4: 1= Insert request for Job Control 

5: 1= Procedure end 

&. l=SYSLOG procedure 

7: 1= Overwrite request for Supervisor 

JCL statement name for Catalogued Procedure 

SYSIN 81 bytes indicator 

Bit 0. 1= Permanent 81 bytes on SYSRDR 
1: 1= Permanent 81 bytes on SYSIPT 
1= Temporary 81 bytes on SYSRDR 
1= Temporary 81 bytes on SYSIPT 
4-6: Not used 

7: 1 = Al low /& for MAINT CATALS 

160 Pointer to POWER/VS Partition Control Block 

164 POWER/VS Flag Byte 1 

Bit 0: l=POWER/VS Accounting Supported 

1: l=Partition under control of POWER/VS 

2: l=POWER/VS Partition 

3-7: Reserved 

165 POWER/VS Flag Byte 2 



0-7: Reserved 



PARTITION IDENTIFICATION KEY (P1K) 



Task 


PIK value 


Partition 




Number of partitions s 


jpported 




5 


4 


3 


2 


I 


Attention 


X'OO' 


X'OO 1 


X'OO' 


X'OO' 


X'OO' 


BG 


X'10' 


X'10' 


X'10 1 


X'10' 


X'10' 


F4 


X'20' 










F3 


X'30' 


X'20' 








F2 


X'40' 


X'30' 


X'20" 






Fl 


X'50" 


X'40' 


X'30 1 


X'20' 





TASK INTERRUPT KEY (T1K) 



Task 


TIK value 




Mumber of part 


"tions supported 


5 


4 


3 


2 


Attention 


X'OO 1 


X'OO' 


X'OO' 


X'OO' 


BG 


X'10' 


X'10' 


X'10' 


X'10' 


F4 


X'20 1 








F3 


X'30' 


X'20' 






F2 


X'40' 


X'30' 


X'20' 




Fl 


X'50' 


X'40' 


X'30' 


X'20' 


Subtask* 


XW-X'FO' 


X'50'-X'F0' 


XMO'-X'FO' 


X'SO'-X'FO' 



* If AP=YES 

LOGICAL TRANSIENT OWNER IDENTIFICATION KEY (UK) 

The halfword LIK at displacement 88 in SYSCOM contains the same value as the TIK 
when the Logical Transient Area (LTA) is in use and therefore identifies the owner of 
the LTA. When LTA is free, the halfword LIK contains zero's. The SVC2 routine sets 
the LIK, and the SVC11 routine resets it to zero. If AP is not supported, the LIK con- 
tains zero's. 



LOGICAL TRANSIENT KEY (LTK) 

The halfword LTK at displacement 1 10 in each partition communication region has a 
zero value in the high-order byte and a key value in the low order byte. In a fore- 
ground communication region, the key value in the LTK is not significant. The LTK 
in the background communication region(BGCOMREG) has the same value as the PIK 
of the partition of the task that owns the LTA, or contains zero's when the LTA is free. 
The SVC2 routine sets the LTK, and the SVC11 routine resets it to zero. 



RAS LINKAGE AREA 



RASLINK 






8 
8 


9 
9 


OA 
10 


OB 
11 


OC 
12 


10 
16 


14 
20 


18 
24 


1C 
28 


CPU ID Field 


Damaged 

Channel 
Byte 


RAS 
Flag Byte 


Machine 
Check 
Flags 


Largest CPU 
Model 


RAS Table 
(RASTAB) 
Address 


Base Address 
for RAS Monitor 


Address of 
Headqueue 
PUB Table 


Address of 
CCH Savearea 


Address of 
Page Queue 


xxxxxxxx 


X 


X 


X 


X 


XXXX 


XXXX 


XXXX 


XXXX 


XXXX 



1 

I Key to RAS Linkage Area displacement 

< 8 






CPU ID Field 






8 


Address of damaged channel, 


or X'FF' if no channel damaged 


9 


RAS Flag Byte 








bit 


flag 


description 





1 
2 
3 
4 
5 
6 
7 


X"80' 
X'40' 
X'20 1 
X'10' 
X'08' 
X'04 1 
X'02' 
X'01 1 


RAS active 

RAS SIO flag 

RTA in control 

RAS I/O delayed 

Channel check on error SIO 

Reserved 

Channel check on SIO 

I/O active for SIO 



10 


Machin 


e Check Flags 








bit 


flag 




description 




0-4 






Reserved 




5 


X'04' 




Hard machine check 




6 


X , 02' 




All machine records built 




7 


x-or 




All channel check 
records built 


11 


Largest CPU Model 






12 


Address of RAS MOnitor Table (RASTAB) 


16 


Address 


used for base 


register ' 


n RAS Monitor Program 


20 


Address 


of Headqueue 


PUB Table 


24 


Address 


of CCH Savearea 




2? 


Address 


of Paqe Queue Table 





Bytes 112-115 (X'70'-X'73') of the System Communicatic 
Lu-el RASLINK indentifies the first byte of the area. 



i (SYSCOM) contain the address of the c 



SYSTEM TASK BLOCKS 



-Address of PIB Flag for System Task 
Reserved 



r-Job Accounting ID 
5 7 



Address of System 
Task Save Area 



- PIK or TIK of Serviced User Task 



Notes: Bytes 152-155 (X'98'-X'W) of the System Communication Region (SYSCOM) 
contain the address of the first System Task Block. 

Label RASB LOCK identifies the first byte of the RAS Task Block. 
Label PMRBLOCK identifies the first byte of the PMR Task Block. 
Label SUPBLOCK identifies the first byte of the SUP Task Block. 
Label CRTBLOCK identifies the first byte of the CRT Task Block. 
Label ERPBLOCK identifies the first byte of the ERP Task Block. 
Label PGNBLOCK indentifies the first byte of the PAGE IN Task Block. 



PROGRAM INFORMATION BLOCK (PIB) - First part 



Attention PIB 



Background P 



Subtask PIB 






1 


2 3 


4 


5 6 7 


8 


9 10 


11 


12 


13 


14 


15 


Flaq 


Cancel 


SYSLOG 


always 


lnactive= zero 


Switch 


Address of sav 


e area 


X'07' 


BG 


Number 


Not 


Byte 


Code 


ID 
(AR) 


zero 


Active= Address 
of LTA save area 


Byte 


or zero 




PIB 
assign 


user 
LUB 


ofBG 
program 


used 


(See© 








(Note 2) 


(SeeB) 


(Note 1) 
(Note 2) 




flag 
(See®) 


index 


LUB's 





Note 1: a) When LTA is inactive- LTA save area address 

> x b) When LTA is active for Problem Programs, this address is exchanged with that in the Problem Program PIB 

* v Note 2: When LTA is active for Logical Attention, bytes 9-11 are zero and bytes 5-7 contain the LTA save area address 

\ 12 3 4 5 6 7 8 9 10 11 12 13 14 15 



£=1 



Flag 
Byte 

(See@) 



Cancel 
Code 



DAT 
flag 



Address of Problem 
Program save area or 
LTA save area 



Address of syster 
area 



assign 
flag 

;See0) 



User 
LUB 



Prograr 
LUB's 



Flag 
Byte 



(SeeE) 



The number of Problem Program PIB's generated depends on the number of partitions specified during system generation. 
Subtask PIB's are generated only if AP= YES has been specified during system generation. 
The number of subtask PIB's generated depends on the numberof partitions, i.e. p. 



Bytes 90-91 (X'5A'-X'5B') of the partition communication region(s) contain the 
address of the first part of the PIB table. Label PIBTAB identifies the first byte 
of the table. 



Nbr of partitions 


Nbr of subtasks 


2 
3 

4 
5 


13 
12 
11 
10 



PROGRAM INFORMATION BLOCK (PIB) - First Part (....Cont'd) 

[a] Flag Byte (First byte in PIB) 

The following flags are always used: 

X'7\' = Program is waiting for SVC58 

X'73' = Program is waiting because system is seized 

X'75' = Program is waiting for copy block 

X'77' = Program is waiting for TFREE 

X'79' = Program is waiting for channel queue entry 

X'7B' = Program is waiting for CCW translation 

X'7D' = Program is waiting for free console buffer table entry (used only when CBF=n) 

X'80' = Program is not active 

X'8T = Program is SVC2-bound (waiting for the LTA to be released) 

X'82' = Program is SVC7-bound (waiting for an I/O interruption) 

X'83' = Program is ready to run 

X'85' = Program is SVC5-bound (waiting for the PTA to be released) 

X'86' = Initial selection of RAS (used only for RAS PIB flag) 

X'87' = Program is set to common bound condition 

X'8B' = Task in QTAM wait (used only when TP=QTAM) 

The following flags are used only if NPARTS>1 . X'61 ' through X'69' are used 
by the load leveller to deactivate a partition. The partition to which a 
flag refers depends on NPARTS as follows: 









NPARTS - 








2 


3 


4 


5 


X'61' 


refers to 


BG 


BG 


BG 


BG 


X'63' 


refers to 


Fl 


F2 


F3 


F4 


X'65' 


refers to 


- 


FI 


F2 


F3 


X'67' 


refers to 


- 


- 


Fl 


F2 


X'69' 


refers to 


- 


- 


- 


Fl 



X'6A' = Program is SVC35-bound 

X'6B' = Program is SVC35-bound 

X'6D' = Program is waiting for next freed page frame 

X'6F' = Program is IDRA-bound 

The following flags are only used if AP= YES: 

X'5r = Program is SVC38-bound 
X'53' = Program is SVC41/42-bound 

The following codes are only used if AP=YESand PFIX=YES. 

The codes are used by the PFIX routines to set a partition PFIX bound. 

The partition to which a flag refers depends on NPARTS as follows: 

NPARTS = 

2 3 4 5 

BG BG BG BG 

Fl F2 F3 F4 

Fl F2 F3 



X'47' 


refers tc 


X'49 1 


refers tc 


X'4B' 


refers tc 


X'4D' 


refers tc 


X'4F' 


refers tc 



PROGRAM INFORMATION BLOCK (PIB) - FirstPort (....Cont'd) 



[A] Flag Byte (Cont'd) 

The following codes are used only if AP= YES and VSAM=YES. 

The codes are used by the VSAM routines to set a partition PFIX bound. 

The parttion to which a flag refers depends on NPARTS as follows: 





X'3D' 


refers to 


BG 


BG 


BG 


BG 




X'3F' 


refers to 


Fl 


F2 


F3 


F4 




X'41' 


refers to 


- 


Fl 


F2 


F3 




X'43' 


refers to 


- 


- 


Fl 


F2 




X'45' 


refers to 


- 


- 


- 


Fl 


El 


PIB DAT Flag 











X'01 ' = Return to re-entrant supervisor routine 

X'02' = Return to gated supervisor routine 

X'04' =Move CCB at dispatching time 

X'08' = Service delayed external interrupt 

X'10' = Deactivation for this task is being delayed 

X'20' = Operator communications to be serviced 

X'40 1 = Task has seized the system 

X'80' = Program is running in virtual mode 



[C] Gate Identifie 



X'71' = Gating of SVC58 required 
X'53' = Gating of SVC41/42 required 

The flags are only used if the PIB DAT Flag is X'03', that is, the first two 
flags are on (See ® ). 

[5] PIB Assign Flag 

X'80' = SYSRES DASD file protect inhibited (allow write operation on SYSRES) 

X'40' = Channel appendage exit allowed (BTAM) 

X'2G" = Cancel in progress (used in terminator function) 

X'10' = Cancel control (set on a foreground cancel) 

X'08' = Hold foreground assignments 

X'07 1 = Attention PIB 

H] Problem Program PIB Flag (Last byte in PIB) 



Bit 1: 
Bit 2: 
Bit 3: 



1 = Batched [ob in foreground (has no function in DOS/VS) 

1= Cancel in LTA and device not assigned 

l = /&on SYSIN if DASD 

1= Partition in stopped state 

1 = Fetch EOJ monitor 

l = Task is canceled 

l=Subtask(s) attached 

1= in AB routine 



PROGRAM INFORMATION BLOCK (P1B) - First Part (....Cont'd) 



|~F~j Attention PIB Switch Byte 



BitO: 
Bit 1: 
Bit 2: 
Bit 3: 
Bit 4: 
Bit 5: 
Bit 6: 
Bit 7: 



Reserved 

1= Fetch Physical Attention Transient $$ABERRZ 

1= Delay cancelation (fetch $$ABERZ1) 

1= Emergency cancel request 

Reserved 

1= Command available (DOC) 

1 = Fetch Logical Attention Routine (SSBATTNA) 

1= Externa I Interrupt request 



PROGRAM INFORMATION BLOCK EXTENSION - Second Part 



Background F 



Address of com- 
munication 



System 
LUB index 



Interrupt 
Information 



(See table @ below) 



Address of termination ECB 
if any, otherwise zero's 



Program 
Interrupt 
Key(PIK) 



Flag 
Byte 

® 



Note 1: Always BG communication region in Attention- and Background PIB extensic 
in other PIB extensions when a multiprogram system has been generated. 



. Appropriate communication regior 



For each PIB Table entry (first part) an entry exists in the PIB Table Extension (second part). 

Bytes 124-125 (X'7C'-X'7D') of the partition communication region(s) contain the address of the PIB Table extension. 

Label PIB2TAB identifies the first byte of the PIB Table extension. 



® 








Type of interruption 


Contents of PIB Extension Bytes 


4 


5 


6 I 7 


SVC 

PC 

I/O 


00 
00 
00 


ILC*) 
ILC*) 
00 


Interruption Code 
Interruption Code 
I/O Address 



*) ILC (Instruction Length Code) is in bits 5 and 6, other bits are zero's. 



(D 




Byte 15 


Bits 0-1 : 


Reserved 


Bit 2: 


l=Task owns CRT 


Bit 3: 


VSAM automatic Close in 




progress 


Bits 4-7 


Not used 



Layout of LTA and Problem Program Save Area 



Not used 


PSW 


Reg 9 


Reg A 


RegB 


RegC 


Reg D 


RegE 


RegF 


Reg 


Reg 1 


Reg 2 


Reg 3 


Reg 4 


Reg 5 


Reg 6 


Reg 7 


Reg 8 


• 


FLTPT RO 


FLTPTR2 


FLTPT R4 


FLTPT R6 



Problem Program Save Area: First half-word : Label area length 

Second half-word : Reserved 

Third and fourth half-word: Job start time 

LTA Save Area: Reserved 



Layout of User Save Area (for AB, PC, OC and IT options) 



Interrupt Status 
Information * 


RegO 


Reg 1 


Reg 2 


Reg 3 


Reg 4 


Reg 5 


Reg 6 


Reg 7 


Reg 8 


Reg 9 


Reg A 


Reg B 


RegC 


Reg D 


RegE 


RegF 



* Interrupt Status Informatior 



Byte 
Byte 1 
Bytes 2-3 
Byte 4 

Bytes 5-7 : 



Unused 

Protection key and Mask (from PSW byte 1) 

Interruption Code 

Bits 0-1 : Instruction Length Code 
Bits 2-3 : Condition Code 
Bits 4-7 : Program Mask 

Instruction Address 



I/O TABLE INTERRELATIONSHIP 



System 
BG 
F4 
F3 
F2 
Fl 



= number of units 
: index displacement 
within LU3 table 



FICL 





























^ 







W\ 



FAVP , 



SSHfi 



I o 



PUBTAB 




3:::::- 






^J 


^frfff 


/* 




□ :=::--"-- = ===- 



► TEBTAB (Option) 

[THTABJ 
► SAB (Options) 

[LMT J 

used by PIOCS 
CHANQ 



LOGICAL UNIT BLOCK (LUB) TABLE 



Number in 
Class List 
(NICL) 



BG 

System LUB's 



BG 

Programmer LUB's 

F4 

System LUB's 



F4 

Programmer LUB's 



F3 

System LUB's 



F3 

Programmer LUB's 

F2 

System LUB's 



LUB's 



Fl 

System LUB's 



Fl 

Programmer LUB's 



First in 
Class List 
(FICL) 



LUB Table for any Partition 

SYSRDR 

SYSIPT 

SYSPCH 

SYSLST 

SYSLOG 

SYSLNK 

SYSRES 

SYSSLB 

SYSRLB 

SYS USE 

SYSREC 

SYSCLB 

SYSVIS 

SYSCAT 

SYS000 

SYS001 

SYS002 

SYS003 

SYS004 



00000000- Points to first PUB and PUBOWNER 

00000001- Points to second PUB and PUBOWNER 
00000010- Points to third PUB and PUBOWNER 



1 1 1 1 1 1 1 - Ignore, assigned ignore 
1 1 1 1 1 1 1 1 - Null Pointer,the LUB is unassigned 
When a logical unit is assigned, the system inserts a point 
to the PUB for the physical device specified. 



_Formatofany LUB 



Byte 


Byte 1 


PUB Pointer 


JIB Pointer 



JIB Index (Multiply by 4 = Displacement into JIB Table) or 
X'FF' = Null Pointer,no JIB for this LUB. 

A LUB has a JIB pointer when: 

1. The logical unit is temporarily assigned 

2. The logical unit assignment is alternate (ALT). 

3. A DASD file (exept a system I/O file on disk) is 
opened (DASD file protect only) 



logical 
SYS213 



Bytes 76 and 77 (X'4C'-'4D') of the partition communication 
region contain the address of the LUB table. 
Label LUBTAB identifies the first byte of the table. 

Notes: 

1) SYSUSE may be called SYSCTL in error recovery messages. 

2) The value that may be specified for the highest programmer 
jnit in the system is: SYS241 if NPARTS= 1, SYS227 if NPARTS=2, 
if NPARTS= 3, SYS199 if NPARTS=4,or SYS185 if NPARTS= 5. 



PHYSICAL UNIT BLOCK (PUB) TABLE 



Channel 1 
PUB's 



Job Control Flags 

Channel Scheduler Flags — 

Device Type 

TE3 Pointer/Retry Counter 

"71 . , \1 



- Channel Que 
-Channel 



Device Characteristic Code! 
or SAB Pointer J 



Byte 0: 


Byte 1: 


Byte 2: 


Byte 3: 


Byte 4: 


Byte 5: 



Channel number. (Hex 0-6, FF= NULL) 
I/O device unit number 

Hex 0, 1, 2, points to the first channel queue entry for this device 

If device is a 2495 Tape Cartridge Reader and TEB's are specified, this 

byte is a TEB pointer. (Hex 1, 2, 3, ). Otherwise this byte is a retry counter. 

Section 2 for device type codes. 

SS of the MODE= parameter in the DVCGEN macro for tape unit. (See 

Section 2) 

For an ICA line Model 115 or 125, this byte contains the displacement 

index of the entry in the Line Mode Table (LMT) . The address of the 

LMTis in SYSCOM. 

For DASD with seek separation, this byte is used as the SAB Pointer. 
With Track Hold but not seek separation supported, this byte contains 
a pointer to the Track Hold Table entry or X'FF' (with both SKSEP and 
TRKHLD specified, the track hold pointer is found in the SAB entry). 

For MICR type devices, this byte indicates which external interrupt line 
is in use. 

For a 3704/3705 Communications Controller, this byte contains the 
type number of the Channel Adapter 

For 2560 or 5425 : 

Bit 0: 1= Repositioning required 

1: 0= SYSPCH temporarily assigned to hopper 1 

1= SYSPCH temporarily assigned to hopper 2 
2: 0= SYSIPT temporarily assigned to hopper 1 

1= SYSIPT temporarily assigned to hopper 2 
3: 0= SYSRDR temporarily assigned to hopper 1 

1= SYSRDR temporarily assigned to hopper 2 

5: 0= SYSPCH permanently assigned to hopper 1 

1= SYSPCH permanently assigned to hopper 2 



PHYSICAL UNIT BLOCK TABLE (. . . .Cont'd) 



Byte 5: 
(Cont'd) 



Byte 6: 



Byte 7: 



0= SYSIPT permanently assigned to hopper 1 
1- SYSIPT permanently assigned to hopper 2 
0= SYSRDR permanently assigned to hopper I 
1= SYSRDR permanently assigned to hopper 2 



Channel Scheduler Flags 

Bit O. 1= Device busy 

1= Switchable device 

2: Reserved 

3: 1= I/O error queued for recovery 

1= Operator intervention required 
1= Device End posting required 
1= Burst or overrunnable device 
l=7-track tape unit 
,1 Flags 



Job Contr 
Bit 0-4: 



Standard MODE assignment for 7-track tape (all ones 
if not tape, all zero's if device is down) 

1= Device supports RPS 



6-7: B'lT (both on)= 



Headqueue in progress 
Headqueue requested 



A null is generated for each device to be supported by the supervisor. 
Standard physical unit assignments are made to the PUB table at 
supervisor generation time. 
PUB's are ordered by channel and priority within a channel. 

An entry in the PUB Ownership Table is associated with each entry 
in the PUB Table, if the suprevisor has been generated to support 
multiprogramming. 

Bytes 64 and 65 (X'40'-'4T) of the partition communication region 
contain the address of the PUB Table entry. Label PUBTAB identifies 
the first byte of the table. 



PHYSICAL UNIT BLOCK OWNERSHIP TABLE 







Byte 0: Bit 0: 1- Volume Is owned by VTAM 

Bit 1 : 1= waiting for volume to be mounted 
Bit 2-7: Reserved 

Byte 1: Identifies the partition that owns the PUB according to following table: 



Flag 


Partition owning PUB if number of partitions is: 


2 


3 


4 


5 


X'OT 
X'02' 
X'04' 
X'08' 
X'10' 


BG 
F 1 


BG 
F2 
F 1 


BG 
F 3 
F2 
F 1 


BG 
F4 
F3 
F2 
F 1 



The number of entries in the PUB Ownership table is equal to the number 
of entries in the PUB table. Associated with each PUB entry is an entry 
in the PUB Ownership table. 

Bytes 120-123 (X , 78 , - , 7B , ) of the system communications region(SYSCOM) 
contain the address of the PUB Ownership table. 
Label PUBOWNER identifies the first byte of the table. 



HEADQUEUE PUB TABLE 



Pointer to system 1 
task's PIB flag J 



Pointer to original PUB— 



copied PUB 







78 9 10 11 



The Headqueue Table has a maximum of 6 entries (for RAS, CRT, ERP, PMR and 

SUPV system tasks). The entries for the RAS and CRT tasks are not generated 

when these functions are not supported. The LOG headqueue entry is only generated 

for models 115 and 125. 

The order of the entries determines the headqueueing priority of the system tasks. 



Bytes 20-23 (X'W-X'W) of the RASLINK area contain the address of the 

Headqueue PUB Table. 

Label HQPUBTAB identifies the first byte of the table. 



JOB INFORMATION BLOCK (JIB) TABLE 





JIBTAB 


f" 




3 . O 








-o o 




ll 




CO 2, 




3 -r 

5" PI 





0*3 



12 3 



Byte(s) 


Description 


0-1 (Contents 
depends on the bit 
setting in byte 2) 


Bit setting 
Byte 2 


Contents 


Bit 0= 1 

Stored standard 
assignment 


LUB entry of stored standard assignment. 
(PUB and JIB pointer) 


Bit 1=1 

Alternate 

assignment 


Byte : PUB pointer 
Byte 1 : X'OO' 


Bit 2= 1 
2311/2314/ 
2319 Extent 


Byte : Cylinder lower limit 
Byte 1 : Cylinder upper limit 

*) Note 1 


Bit 3= 1 

2321/3330/3340 

Extent 


For 2321 : 

Lower limit (Cell or combined 
subcell and strip) or 






Upper limit (Cell or combined 
subcell and strip) 






For 3330 or 3340: 

Cylinder lower limit or 






Cylinder upper limit (One cy- 
linder number uses two bytes) 

*) Note 1 

*) Note 2 


2 


Meaning if bit = 1 : 

Bit : Stored standard assignment 

Bit 1 : Alternate assignment 

Bit 2: 231 1/2314/2319 extent 

Bit 3 : 2321/3330/3340 extent 

Bit 4 : The alternate assignment indicated in bit 1 is perma- 
nent. This bit is also on when one of the extent indi- 
cators (bit 2 and bit 3) is on. 

Bit 5: Catalogued procedures processing 

Bit 6/7: Reserved 



JOB INFORMATION BLOCK (JIB) TABLE (....Cont'd) 



Byte(s) 


Description 


3 


Chain byte 

Contains the displacement index of the next JIB. 

X'FF' defines the end of the chain. 



* Note 1 : Only when file-protect on DASD. 

* Note 2 : Two JIB's are required for a 2321/3330/3340 extent; one for lower 

limit and one for upper limit. 

The lower limit defining JIB must be chained to the upper 

limit defining JIB. 

For 2321, byte 1 of this type JIB contains the subcell number 

times 10 plus the strip number in binary. 

Bytes 68-69 (X'^'-^S 1 ) of the partition communication region contain the 
address of the JIB table entry. Label JIBTAB identifies the first byte of the 
table. 



CHANNEL QUEUE TABLE 



CHANQ 




Task requestor Identificati 
LUB Displacement — 
LUB Identification- 
Requestor Identification — 

■ Chain byte 

\ ( — CCB address 



Format of any channel queue table 



Byte 0: Contains the displacement within the channel queue of the next entry in 

the free list or in the list for a specific device,or X'FF' when it is the 

last entry in the free list or a device list. 
Bytes 1-3: Contains the CCB address for the specified device. 
Byte 4: Contains a code identifying the task making the I/O request. This one 

byte entry indicates to which task the CCB belongs, and is in the form 

X'nk' where: 

n= user storage protection key. (Attention or system task= 0,BG task= 1, 

FG tasks=2-5 depending on the number of partitions). 

k=0 for Attention and all user tasks. 

1 for RAS 

2 for PMGR 

3 for SUPVR nK=FF for any unused channel queue entries. 

4 for CRT 

5 for ERP 

6 for PAGE IN 

Byte 5: Contains pointer(displacement index) to the entire LUB table identifying 

the logical unit making the I/O request. This is doubled to get the actual 
displacement into the full LUB table. 

Byte 6: Contains X'FF' if the LUB is a programmer class, or the displacement 

within the partition LUB if it is a system class. 
(Not used by a non MPS Supervisor). 

Byte 7: Contains the displacement within the PIB table of the PIB of the task re- 

questing I/O, or X'FF' when the channel queue entry is in the free list. 
(Not used by a non MPS Supervisor). 

* FLPTR: The free list pointer contains the index within the channel queue 

of the first entry in the free list or X'FF' when the channel queue is full. 
Byte 36 (X'24 1 ) of the System Communication Region (SYSCOM) contains 
the Free List Pointer. Label FLPTR identifies the location of the pointer (1 byte) 

** PUB byte 2: The PUB channel queue pointer contains the index within the 

channel queue of the first entry for a specific device. 
Bytes 37-39 (X'25'-X'27') of the System Communication Region (SYSCOM) 
contain the address of the Channel Queue table entry. Label CHANQ 
identifies the first byte of the lable. 



CHANNEL BUCKETS 



REGSAV 






N -^ 




n 




§ 




i- 




■* 



-Bytes 



Address of first 
PUB on Channel 



CCB Pointer 
(Rl) 



Device Address 
(R2) 



PUB Pointer 
(R3) 



Channel Queue 
Pointer 
(R4) 



PIB Pointer 
(R5) 



A channel bucket contains information related to the last I/O started on the channel. 

The number of channel buckets in a system equals the number of I/O channels in the system. 

Bytes 48-51 (X'SO'-X^ 1 ) of the System Communication Region (SYSCOM) contain the 

address of the Channel Buckets. 

Label REGSAV identifies the first byte of the table. 



CROSS PARTITION ECB (XECB) TABLE 



XECBHDR Table Header 



No of slots 
generated 



Length of 



Address of 
XELB table 



XECB name 


Access 
code 


XECB 
address 


Task ID 
of owner 


Task ID 
of waiter/ 
poster 



Byte 8 

Bits 4 - 7 : Access indicators 

1001 = Owner of XECB is allowed to issue XPOST, 
one other task may issue XWAIT. 

0110 = Owner of XECB is allowed to issue XWAIT, 
one other task may issue XPOST. 



CHANNEL CONTROL TABLE 



Chcnnel 


Channel 1 


Channel 2 


Channel 3 


Channel 4 


Channel 5 


Channel 6 



» 3 3 



Byte 0: X'20'= Block Multiplexer Channel 

X' 10'= Byte Multiplexer Channel 

X'H'=Byte Multiplexer Channel with burst mode support 
X' 13'= Byte Multiplexer Channel running in burst mode 
X'00'= Selector Channel 
X'80'= Channel not operational or not present in the system 

Byte 1: Always zero 



Byte 60-63 (X'SC'-'SF 1 ) of the system communications region(SYSCOM) 
contain the address of the Channel Control Table. 
Label CHNTAB identifies the first byte of this table. 



TRACK HOLD (THTAB) TABLE 
THTAB 



THFLPTR*) 
r. 3 =1 



£"-n l 





13 4 9 


10 


1 


1 


2.3 




CCB Address 


Address of held track 
(BBCCHH) 






J: 7 


l_ 


— Chain byte 


Key of task ' 

Flag and Counter 





Byte 0: Initially, pointer to next sequential entry or X'FF'(table delimiter)in 

last entry. After requests have been issued, this byte points to the 
entry for the next request for a track on the same device, or contains 
X'FF' (in entry for the last request), or it is a pointer in the free list 

Bytes 1-3: Address of CCB associated woth the task requesting the hold. 

Bytes 4-9: Disk address of the track being held (in the form BBCCHH). 

Byte 10. Key of the task owning the track. 

Byte 11: Bit 0=1: Indicates a task is waiting for this track 

Bits 1-3: Unused 

Bits 4-7 : Counter of number of holds on the track. (The number of 
holds is one more than this value). 

*) Note: THFLPTR: The track hold free list pointer (1 byte) contains the dis- 

placement within the Track Hold table of the first entry 
in the free list or X'FF' when the Track Hold table is full. 



Bytes 77-79 (X^D'-^F 1 ) of the system communication region (SYSCOM) contain the 
address of the Track Hold table. Label THTAB identifies the first byte of the table. 

Byte 76 (X'4C) of the System Communication Region (SYSCOM) contains the address 

of the Track Hold Free List Pointer. Label THFLPTR identifies the location of the pointer. 



TAPE ERROR BLOCK (TEB) TABLE 





TEBTAB 






TEB I 


--' 


S-=H 


TEB 2 


3 


Q. to 


TEB 3 


| 


TEB 4 




^ § 


TEB 5 




"8 8 


TEB 6 


/ 



12 3 4 5 



/ Byte 0: Error recovery retry count. 

Byte I: Permanent read data check 
error count. 

Byte 2: Number of times the read 
data check error routine is 
entered. 

Byte 3: Number of times the write 
data check error routine is 
entered. 

Byte 4: Write skip(erase gap) count. 

Byte 5: Noise record count. 

One TEB is generated for each 2495 Tape Cartridge Reader unit if the FOPT macro 
contains the TEB= n parameter. Job Control resets each TEB at normal or abnormal 
End-of-Job.An unused TEB contains HEX'FFOOOOOOOOOO'. A TEB is referenced from 
byte 3 of a Tape Cartridge Reader unit PUB. 

Bytes 70 and 71 (X'46'-'47') of the partition communications region(s) contain the 
address of the TEB Table entry. Label TEBTAB identifies the first byte of the table. 



CONSOLE BUFFERING TABLE 







ICBNEXTi 






o a. a 




? i I 




Hi 




|| | 





CBCCB 



_J03 



CBDATAU 



|CBNEXT| points to next buffer entry 



/ Bytes 0- 7 CCW: 
/ Command code, chain byte, 

and count field copied from 
the user's CCW. The data 
address is always the address 
of the data portion of the 
buffer entry. 

Bytes 8- 23 CCB: 

The CCB used by the console 
buffering routine; The CCW 
address is always the address 
of the CCW in the buffer entry. 

Bytes 24-103 DATA: 

Contains the data moved from 
the requestor's output area. 



Label CBTAB identifies the first byte of the Console Buffer. 



LINE MODE TABLE 



TT 



IT 



n 3 H. 

? 3 



+ — '_l Ac 



The first 4 bytes of the table 

mum number of start/stop lines. Set by the IOTAB 
o at system generation 

mum number of BSC lines. Set by the IOTAB macro 



system generation 

Actual number of start/stop lines. Determined by DVCGEN 
macros at system generation and ADD commands at IPL 

Actual number of BSC lines. Determined by DVCGEN macro 
at system generation and ADD commands at IPL 




Line Mode settings for 
Model 115/125 Comm. Adapter 



Bytes 140-143 (X'SC'-X'&T') of the System Communication Region (SYSCOM) 

contain the address of the table. 

Label MODTAB identifies the first byte of the table. 



PAGE DATA SET TABLE (DPDTAB) 



Extent Information 


Number of 
Pages supported 


Volume ID 

for 

Page Data Set 


Address of 
Constant Table 

for 
Load Leveller 



Extent Information (Bytes 0-11) 

Bytes and 1 : Channel and Unit number of SYSVIS Device 

Bytes 2 and 3 : Internal device code of SYSVIS Device 

(offset in Page Manager Device Constants List) 
0=2314, 4=3330, 8=3340 



Bytes 4 - 7 : 
Bytes 8-11: 



Relative track address of Lower LTrr 
Relative track address of Upper Lirr 



Bytes 224-227 (X'EO'-X'ES 1 ) of the System Communicati 

contain the address of the DPDTAB. 

Label DPDTAB identifies the first byte of the table. 



i Region (SYSCOM) 



SEEK ADDRESS BLOCK (SAB) 
SAB 



Tir 



B 


C 


C 


H 


X'FF' 



Bytes 0-3 : Current Disk Address (BCCH) 

Byte 4 : X'FF' or: Pointer to the Track Hold table entry 



A SAB table is only generated if Seek Separation has been specified at 
supervisor generation time. 

Bytes 56-59 (X^'-X^') of the System Communication Region 
(SYSCOM) contain the address of the SAB Table. 
Label SAB Identifies the first byte of the table. 



DISK INFORMATION BLOCK (DIB) TABLE 



DSKPOSBG 


BGDIB 
Table 


DSKPOSF4 


F4DIB 
Table 


DSKPOSF3 


F3DIB 
Table 


DSKPOSF2 


F2DIB 
Table 


DSKPOSF1 


Fl DIB 
Table 



The number of DIB tables depends 
on the number of partitions speci- 
fied at supervisor generation. 





Format of any DIB table if SYSFIL= 
6 7 


YES 


9 


10 












16 


17 


18 


19 


20 


21 


22 


23 




Current Address 


K D D 


End Address 


UL 


LL 


M 


RC 




SYSLNK 


C 


C 


H 


H 


00 


00 


00 


P 


P 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


SYSIN 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


SYSPCH 


B 


B 


C 


C 


H 


H 


R 


00 


00 


51 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


SYSLST 


B 


B 


C 


C 


H 


H 


R 


00 


00 


78 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


PRCDIB 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 





Format of any DIB table if SYSF 1 L= 
6 7 


NC 


9 


10 




16 


17 


18 


19 


20 21 


22 23 




Current Address 


K D D 


End Address 


UL 


LL 


M 


RC 




SYSLNK 


C 


C 


H 


H 


00 


00 


00 


P 


P 


00 




PRCDIB 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B | B | C |C | H | H 


1 R 1 H 1 H |XX|XX|XX|00 1 00 



■) BG SYSLNK DIB contains the PUB pointer for CLB. 
For FG SYSLNK DIB's this byte is unused. 





Format of 3540 Diskette DIB ta 
6 


ble 

7 




9 


10 












16 


17 


18 


19 


20 


21 


22 


23, 




Current Address 


K D D 


End Address 






M 


RC 




SYSIN 


00 


00 


00 


00 


C 


H 


R 


00 


00 


00 


FLG 


EXTHDR 


00 


C 


H 


R 


00 


00 


XX 


00 


00 


00 


00 


SYSPCH 


00 


00 


00 


00 


C 


H 


R 


00 


00 


00 


FLG 


EXTHDR 
4* 4* 


00 


C 


H 


R 


00 


00 


XX 


00 


00 


00 


00 


SYSLST 


00 


00 


00 


00 


c 


H 


R 


00 


00 


00 FLG 


E J? 


HDR 


00 


C 


H 


R 


00 


00 


XX 


00 


00 


00 


00 



DISK INFORMATION BLOCK (DIB) TABLE (... .Cont'd) 



Bytes - 6 : Current address 

Bytes - 5 : Current address of key: the next address 
to be used (both for Input and output) . 
6 : Record number of current address. 

Bytes 7 - 9 : KDD 

Key and data length of the symbolic device. 
PP: starting cylinder of private core image 
library if PCIL is assigned; otherwise zero. 

Bytes 10-16: End address 



Bytes 10-15: End address of key: the last address 
within the limits of the extent. 
1 6: Record number of end address . 
(if 3540, byte 10: flag byte 

X'80' = no more extents 
X'40' = last volume 
X'10' = continued volume 
byte 1 1 : extent number 
byte 12: HDR 1 number ) 



Byte 17 
Byte 18 
Byte 19 
Byte 20-21 



Byte 22 
Byte 23 



Upper head limit (3540 not used) 

Lower head limit (3540 not used) 

Maximum number of records per track. 

Record count: residual capacity for 
beginning of operator notification. 
Set at system generation time with 
SYSFIL parameter, or after IPL with 
SET statement (RCLST and/or RCPCH 
operands) . 

A warning message is issued by job con- 
trol after end-of-job step when the 
minimum number of remaining records 
has been reached or exceeded during 
the previous job (not supported for 3540) . 



X'40' Indicates RPS support 
Reserved 



Note : There is one DIB table for each partition. 

Label DSKPOSBG identifies the first byte of the BG DIB table (DSKPOSF1, -F2, -F3, -F4 for the other partitions). 

The addresses of the DIB tables are contained in bytes 96 and 97 (X'60' - X'61 ') of the appropriate partition communication region. 



TABLES FOR MICR DTF ADDRESSES AND POINTERS 



The fable of DTF addresses (PDTABB) contains six 8-byte entries; one for each 
line of the direct control feature on the system. 



Byte 


| 1 | 2 | 3 


4 


5 | 6 | 7 


AND instruction 


Owner 

ship 

Flags 


DTF address for MICR 



8 
16 
24 
32 
40 


Nl PDSTAT+1 X'FE' 
Nl PDSTAT+1 X'FD' 
Nl PDSTAT+1 X'FB' 
Nl PDSTAT+1 XT7' 
Nl PDSTAT+1 X'EF' 
Nl PDSTAT+1 X'DF' 




Device on line 7 
Device on line 6 
Device on line 5 
Device on line 4 
Device on line 3 
Device on line 2 



Bytes 0-3 Contain an 'AND'instruction that is executed ii 
off the external line status after its detection. 



i line coding to turn 



PDSTAT+1 will contain one or more of the following interrupt codes: 



External interrupt 


Interrupt Code 


External interrupt 


code bit 


(byte X'87') 
nnnnnnnl 


cause 


15 


External signal 7 


14 


nnnnnnln 


External signal 6 


13 


nnnnnlnn 


External signal 5 


12 


nnnnlnnn 


External signal 4 


11 


nnnlnnnn 


External signal 3 


10 


nnlnnnnn 


External signal 2 



n= other external interrupt conditions 

Byte 4 Contains the flag of the partition containing the DTF 

Background= 10 
Foreground= 20-50, depending on the number of partitions 

Bytes 5-7 Contain the address of the DTF table 

Table of pointers (PDTABA) to DTF addresses with the external interrupt line. The table 
is set up to handle the status in descending order from bit 15 to bit 10 of the external 
interrupt code. 



Byte 


° 


' 


1 2 


3 


1 * 


1 » 


1 * 


1 7 





00 


08 


00 


10 


00 


08 


00 


18 


8 


00 


08 


00 


10 


00 


08 


00 


20 


16 


00 


08 


00 


10 


00 


08 


00 


18 


24 


00 


08 


00 


10 


00 


08 


00 


28 


32 


00 


08 


00 


10 


00 


08 


00 


18 


40 


00 


08 


00 


10 


00 


08 


00 


20 


48 


00 


08 


00 


10 


00 


08 


00 


18 


56 


00 


08 


00 


10 


00 


08 


00 





Bytes 126 and 127 (X'7E'-X'7?') of the partitions communication region contain the 
address of these tables. Label PDTABB identifies the first byte of the first table. 
The tables are also used for optical reader /sorters. 



ERROR RECOVERY PROCEDURE INFORMATION BLOCK (ERPIB) 



CSV/ 


Sense 
Information 


PUB 
Pointer 


Channel 
Queue Pointer 



Reserved 


Message 






Flag Byte 


Extended 
CSW 


17 


18 


19 




20 21 23 
Requestor Identification 



Byte 20: Flag Byte: 

Bit 0: 

1-4: 

5: 



1= Channel Check on SIO 
Not used 

1= Sense data stored 
1= DASD ERPIB active 
Not used 



A free entry is indicated by X'FE 1 in byte zero. 
Label ERPIBQ identifies the first byte of the Queue. 



ERROR RECOVERY BLOCK AND ERROR QUEUE ENTRY 



Name of phase 
to be fetched 



Branch address 
to retry the 
the falling 
operation 



Branch address 
to Ignore the 
error 



Branch address 
to cancel the 
task 



Return address 
for A-transient 



First error queue entry 



Last error queue entry 



The A-transient loads one of these addresses In 
register 14 before branching to the return address 
(see bytes 14-15) 



Error queue entries (44 bytes each). 

The number of entries Is determined 
at supervisor generation. 



Layout of any Error Queue entry 

Bytes 0- 7: CSW 

Bytes 8- 9: Address of PUB for device In error 

Byte 10: Flag byte: 

Bit 0: 1= No record found on DASD 
1: 1= Intervention required 
2:1 1= Passbook (Set by device ERP) 
3: 1= Allow Ignore 
4: Not used 
5: 1= Allow retry 
6: Not used 
7: 1= Active entry 

Byte 11: Message code: may refer to a device error 
recovery message generated by physical 
IOCS (See Cancel codes and Messages) or: 



Byte 1 1: This location may contain one of the following: 

(Cont'd) X'E2' =Tho error is recoverable 

X'AE' = A record Is to be recorded on the system recorder file for SVC44 or a 
BTAM appendage routine, and a physical transient is to be fetched (last two 
characters of phase namo are in bytes 20-21). 

Bytes 12-15: Disk seek address 

Bytes 16-19: Address of CCB 

Bytes 20-43: Sense data: The number of sense bytes generated depends on the options speci- 
fied; the minimum is 24 bytes, 
or: 

Alternate entry name: If byte 11 contains X'AE', bytes 20-21 contain the last 
two characters of the phase name of the physical transient to be fetched for 
SVC44 (A3) or BTAM (A5). X'AF' in byte 22 indicates that the I/O area asso- 
ciated with an alternate entry has been fixed temporarily. 

Note: The address of the Error Block can be found in SYSCOM at displacement (X'00 1 ). 



CANCEL CODES AND MESSAGES 



Cancel 
Code (hex) 


Message 
Code 


Descriptive part of Message 
or Condition 


Label 


10 




Normal EOJ 


ERR 10 


11 


0V071 


No channel program translation for unsuppor- 
ted device 


ERR 11 


12 


0V06I 


Insufficient buffer space for channel program 
translation 


ERR 12 


13 


0V05I 


CCW with count greater than 32 K 


ERR 13 


14 


0V04I 


Page pool too small 


ERR 14 


15 


0V02I 


Page fault in disabled program 


ERR15 


16 


0V01I 


Page fault in MICR stacker select or 
PHO routine 


ERR16 


17 


0S02I 


Program request (Same as 23 but causes dump 
because subtasks were attached when main- 
task issued CANCEL macro) 


ERR 17 


18 




Eliminates cancel message when maintask 
issues DUMP macro with subtasks attached 




19 


0P74I 


I/O operator option 


ERR 19 


1A 


0P73I 


I/O error 


ERR1A 


IB 


0P82I 


Channel failure 


ERR1B 


1C 


0S14I 


CANCEL ALL macro 




ID 


0S12I 


Main task termination 




IE 


0S13I 


Unknown ENQ requestor 




IF 


0P81I 


CPU failure 


ERR1F 


20 


0S03lor 
0S11I 


Program check 


ERR20 


21 


0S04lor 
0S09I 


Illegal SVC 


ERR21 


22 


0S05I or 
0S061 


Phase not found 


ERR22 


23 


0S02I 


Program request 


ERR23 


24 


0S01I 


Operator intervention 


ERR24 


25 


0P77I 


Invalid address 


ERR25 


26* 


0P71I 


SYSxxx not assigned (unassigned LUB code) 


ERR26 


27 


0P70I 


Undefined logical unit 


ERR27 


28 




QTAM cancel in progress 




29 


0S15I 


No relocating loader support (Fetch or load 
request for relocatable phase while supervisor 
does not support relocating load) 


ERR29 


2A 


0V10I 


I/O error on page data set 




2B 


0P84I 


I/O error during fetch from PCIL 


ERR2B 



CANCEL CODES AND MESSAGES (....Cont'd) 



Cancel 
Code (hex) 


Messages 
Code 


Descriptive part of Message 
or Condition 


Label 


2C 


0V09I 


Illegal parameter passed by PHO routine 


ERR2C 


2D 


0P88I 


Program cannot be executed/restarted due to 
failing storage block 


ERR2D 


2E 


0S16I 


Invalid resource request (possible deadlock) 


ERR2E 


2F 


0V03I 


More than 255 PFIX requests for 1 page 


ERR2F 


30 


0P72I 


Reading past/& statement (on SYSRDR or 
SYSIPT) 


ERR30 


31 


0P751 


I/O error queue overflow (error queue over- 
flow) 


ERR31 


32 


0P76I 


Invalid DASD address 


ERR32 


33 


0P79I 


No long seek (disk) 


ERR33 


34 




Reserved 




35 


0P85I 


Job control open failure 


ERR35 


36 


0V08I 


Page fault in I/O appendage routine 


ERR36 


37 




Reserved 




38 


0V11I 


Wrong privately translated CCW 


ERR38 


39 




Reserved 




40 


5J95I 


VTAM termination 




41 


5J96I 


VTAM termination 




FF 


0P78I 


Unrecognized cancel code 






0P83A** 


Supervisor catalog failure 






0P87A** 


IPL failure 





If the CCB is not available, the logical unit is SYSxxx. 

The cancel code is not significant in case of a supervisor catalog or IPL 
failure, because the system is placed in the wait state without any further 
processing by the Terminator. 



Note : In addition to recognizing the cancel codes above, the Terminator also 

recognizes the same codes with the X'80' bit on (cancel occurred in LTA). 
The X'80' bit is tested by $$BEOJ and subsequently reset. 



PUB2 ENTRY ADDRESSING 



Ln 



L. 



S— 



HK52 



.J 



Length of PUB2 AREA 



' Address of PUB2 AREA 



■ PUB2 INDEX TABLE 



(7Z 



2 bytes entries giving the 
displacement from the be- 
ginning of the PUB2 AREA 



How to find the PUB2 entry for a device: 

Qj Subtract from the address of the device 
PUB, the PUB Table start address and 
divide the result by 4. 

[2] Find in the RF Table at displacement 52 
(X'34') the PUB2 Index Table. 

[|] Use the result from Q] as a displacement 
into the PUB2 Index Table. This will give 
you the two bytes index (i.e. displacement) 
of the PUB2 entry of the device PUB. 

(3 Find in the RF Table at displacement 48 
(X'30') the address of the PUB2 AREA. 

[5] Use the value from |3] as a displacement 
in the PUB2 AREA. 



See PUB2 for the format of 
the entries for the various 
device types 



Note: PUB2AREA is not generated for model 115, 125 without RMSR support. 



PUB 2 Table Entry Format for Unit Record and Unsupported Devices 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 



3 

4 
5 
6 


3 

1 

1 
1 
6 


Usage Count (number of non-ERP SIO's) 

Flag Byte: Bit 0. 1= Device in intensive mode 
1: 1= Device in diagnostic mode 
2: 1= No recording mode 
3: 1= Call statistics transient 2 
4: 1= Use PUB 2 name completion field 
5: 1= Volume opened on this device 
6,7: Reserved 

CE mode limit byte 

CE mode byte/bit mask 

Statistical data counters 


Total length 12 



PUB 2 Tab 


e Entry Format for DASD 


Decimal 


Byte 
Length 


Description 





3 


Usage Count (number of non-ERP SIO's) 


3 


1 


Flag byte: Bit 0: 1= Device in intensive mode 
1: 1= Device in diagnostic mode 
2: 1= No recording mode 
3: 1= Call statistics transient 2 
4: 1= Use PUB 2 name completion field 
5: 1= Volume opened on this device 
6,7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


1 


Flag byte: Bit 0: 1= Soft DASD error is queued 
Bit 1: 1= ERP requests logging of error 
2-7: Reserved 


7 


2 


Reserved 


9 


1 


Physical module identifier 


10 


6 


Volume serial number 


End 3340 


Total length 16 


.. 


8 Statistical data counters 


End DASD 


except 3330 Total length 24 


24 


8 1 Additional statistical data counters (3330 only) 


End 3330 


fotal length 32 



PUB 2 TABLE (....Cont'd) 

PUB 2 Table Entry Formats for Tapes 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 





3 


Usage Count (number of non-ERP SIO's) 


3 


1 


Flag Byte: Bit 
1 

2 
3 
4 
5 
6-7 


1= Device in intensive mode 

1= Device in diagnostic mode 

1= No recording mode 

1= Call statistics transient 2 

1= Use PUB2 name completion field 

1= Volume opened on this device 

Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


2 


Name of ERP that wants control 


8 


1 


Flag byte 1: Bit 
1 
2 
3 

4 

5 
6 
7 


Reserved 

1= Unsolicited interrupt 

1= ERP is in control 

1= ERP requests repositioning 

1= Use original TIE byte 

0= Use opposite TIE byte 

1= Intercept next SIO request 

1= ERP read opposite request 

1= Restart user's CCW chain 


9 


1 


Flag byte 2: Bit 
1 
2 
3 
4 
5 

6 

7 


1= Last ERP operation was ERG 
1= Last ERP operation was reposition 
1= Cleaner action in progress 
1= Read Opposite Recovery in progress 
1= Message stored in P20RGTIE 
1= Error on attempt to recover by reposi- 
tioning 
1= Data check after ERP in control 
Reserved 


10 


1 


Flag byte 3: Bit 

1 

2 
3 
4 
5 
6-7 


1= Failing CCW is Write or Control 

command 
1= User reading backwards 
1= Read Opposite Recovery (ROR) 
1= Maximum ROR retries 
1= Command chaining ROR 
1 = ROR suppressed incorrect length 
Reserved 


11 


1 


Temporary read count 


12 


1 


Temporary write count 


13 


1 


Noise record count 


14 


2 


Erase gap count 


16 


2 


Cleaner action count 


18 


1 


Permanent read errors count 


19 


1 


Permanent write errors count 



PUB2 TABLE (....Cont'd) 

PUB 2 Table Entry Formats for Tapes 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 


20 


1 


TIE original direction 


21 


1 


TIE opposite direction 


22 


1 


ERP counter 


23 


1 


ERP counter 1 


24 


8 


ERP work area 


32 


6 


Tape serial number 


38 


2 


Block Length 


40 


4 


User ROR command address from CSW 


44 


2 


User ROR residual count from CSW 


46 


2 


Reserved 


48 


10 


2400-series statistical data counter area 


58 


2 


Reserved 


End 2400- 


series Total length 60 


40 


20 1 3410/3420 statistical data counter area 


End 3410/ 


3420 Total length 68 



PUB 2 Table Entry Format for 3886 Optical Character Reader 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 



3 

4 
5 
6 


3 

1 

1 
1 
20 


Usage count (num 

Flag byte: Bit 
1 

2 
3 
4 
5 
6-7 

CE mode limit by 

CE mode byte/bit 

Statistical data c 


ber of non-ERP SIO's) 

1= Device in intensive mode 

1= Device in diagnostic mode 

1= No recording mode 

1= Call statistics transient 2 

1= Use PUB2 name completion field 

1= Volume opened on this device 

Reserved 

e 

mask 

ounters 


End 3886 Total length 26 



PUB2 TABLE (....Cont'd) 

PUB 2 Table Entry Format for 3540 Diskette 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 





3 


Usage Count (number of non-ERP SIO's) 


3 


1 


Flag byte: Bit 0: l=Device in intensive mode 
1: l=Device in diagnostic mode 
2: l=No recording mode 
3: l=Call statistics transient 2 
4: l=Use PUB2 name completion field 
5: l=Volume opened on this device 
6-7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


8 


Statistical data counters 


14 


1 


Bit 0-5: Reserved 

6: l=System file opened by Job Control 


15 


1 


7: l=System file opened by Problem Program 
Reserved 


End 3540 


To 


al length 16 



RECORDER FILE TABLE (RF TABLE) 



Displacement 


Label 


Byte 
Length 




Description 


Dec 


Hex 










RFTABLE 
RFFLAGS1 


1 


Labe 
BitO 

1 

2 
3 
4 
5 
& 
7 


of Starting Address 
1= File full 

1= RDE option included 
1= Initial IPL 

Reserved 
1= File is to be created 
1= File has been created 

Reserved 
1= File open and ready 


1 


1 


RFFLAGS2 


1 


Bit 
1 
2 
3 
4 
5 
6 
7 


1= File full message request 
1= Last track message request 
1= I/O error message request 
1= Data lost message request 
1= EVA message request 
1 = File owned by RTA recorder 
1= File owned by PTA recorder 
1= File being accessed by EREP 


2 


2 


RFFLAGS3 


1 


BitO 
1 
2 
3 
4 
5 
6 

7 


1= Last track message issued once 

1= Error is to be recorded 

1= Short form record request 

1= Individual records for unlabeled tapes 

1= Reserved 

]= Reserved 

1= Exit to SSBOMT05 indicator for 

SSBOPEN 
1= Exit to SSBOMT01 indicator for 

SSBOPEN 


3 


3 


RFFLAGS4 


1 


Work area switches for various transients 
including BTAM 


4 


4 


RFFLAGS5 


1 


Reserved 


5 


5 


RFNOFN 


1 


N of N records (low order 4 bits contain the 
number of records to be recorded and high 
order 4 bits contain the record number being 
processed 


6 


6 


RFRECTYP 


1 


Record type code 


7 


7 


RFREL 


1 


DOS/VS ID-Release Level code 


8 


8 


RFRDSW 1 


1 


Record dependent switch 1 


9 


9 


RFRDSW2 


1 


Record dependent switch 2 


10 


A 


RFEXIT 


2 


Exit phase name or exit address 


12 


C 


RFMCONST 


2 


Multiplier for track balance 


14 


E 


RFDCONST 


2 


Divisor for track balance 


16 


10 


RFOCONST 


2 


Overhead track for balance 


18 


12 


RFRECLEN 


2 


Length of record 


20 


14 


RFTIMEA 


4 


Address of RMSR time entry 



RECORDER FILE TABLE (RF TABLE) 



Displacement 


Label 


Byte 
Length 


Description 


Dec 


Hex 


24 


18 


RFRECADR 


4 


Address of record 


28 


1C 


RFSEEK 


7 


Work area for seek address(BBCCHHR) 


35 


23 


RFEREPK 


1 


Key of EREP partition 


36 


24 


RFHDRCH 


4 


SYSREC cylinder/head 


40 


28 


PFCHMAP 


1 


Map of supported channels 


41 


29 


RFCHIDC 


3 


Channel ID codes 


The following entries are n 


3t generated for Model 115,125 without RMSR support 


44 


2C 


RFEVARTH 


1 


EVA read treshold 


45 


2D 


RFEVAWTH 


1 


EVA write treshold 


46 


2E 


RFP2ENTL 


2 


Length of PUB2 Entry Area 


48 


30 


RFP2ENT 


4 


Address of PUB2 Entry Area 


52 


34 


RFP2ITAB 


* 


PUB2 Index Table 



Two bytes are generated for each PUB2 entry in the system. (See PUB2 Entry Address'ng for 
using the PUB2 Index Table to access the PUB2 entries. 

Bytes 100-103 (X'64'-'67') of the system communication region (SYSCOM) 
contain the address of the Recorder File Table. 
Label RFTABLE identifies the first byte of the table. 



CRT CONSTANT TABLE (CRTTAB) 



Name of 
CRT Routine 


Dummy 
Sense 
Byte 


Address of 

CRT 
Save Area 


Flag 
Byte 1 


Address of 

CRT 
Trans.Area 


Flag 
Byte 2 


Address of 
System Task 
Save Area 


CRT error 
Information 

*) 



Byte 



e byte: 



*)limited channel 
logout is saved here 



Bit : 1= Command reject 

Bit 1 : 1= Intervention required (only if Console Printer is attached) 

Bit 4 : 1= Equipment check (only if Console Printer is attached) 

Bit 7 : 1= Operation check 

or: this byte is used for saving Name Indicator 
Byte 12 -Flag Byte 1: 



X'40' 
X'20' 
X'10' 
X'08' 
X'04' 
X'02' 



ERP message 
Unit check for CRT 
CRT Fetch bound 
Device End simulated 
Validation error 
Re-display mode 
CRT error 



Byte 16 -Flag Byte 2: 



XW 
X'40' 
X'20' 
XMO' 
X'08' 
X'04' 
X'02' 
X'OT 



CRT busy 

Sense byte prepared 
End of CRT routine 
Data already read 
Attention pending 
Request pending 
Attention request 
EOJ on CRT 



Bytes 52-55 (X^'-X^ 1 ) of the System Communication Region (SYSCOM) 
contain the address of the CRT CONSTANT Table. 
Label CRTTAB identifies the first byte of the table. 



PROGRAM CHECK OPTION TABLE 






PC Routine Address 


Save Area Address 



Bytes 0-3 : 



No STXIT issued 

STXIT issued 

STXIT issued and 
the user routine 
is already in use 

Bytes 4-7 : No STXIT issued 
STXIT issued 



Address of the user Program Check Routine 



Complement of user Program Check Routine 
address 



zero 

Address of the user Save Area 



Note: In a supervisor without multiprogramming support, there is only one entry 
(BG) in each generated table. With multiprogramming support, there is 
is one entry for each partition supported. 

With asynchronous processing support, each generated table always comprises 
15 entries; the subtask entries occupy the higher address locations in the 
table. 

Bytes 100-101 (X^'-X^ 1 ) of the partition communication region contain 
the address of the PC Option Table. Label PCTAB identifies the frist byte 
of the table. 



OPERATOR COMMUNICATION OPTION TABLE 



OC Routine Address 



Save Area Addre 



Bytes 0-3 : No STXiT issued 
STX1T issued 

STXIT issued and 
the user routine 
is already in use 



Address of the user Operator C 
Routine 



Complement of the user Operator Communication 
Routine address 



Bytes 4-7 : No STXIT issued 
STXIT issued 



zero 

Address of the user Save Area 



Note: In a supervisor without multiprogramming support, there is only one entry 
(BG) in each generated table. 
With multiprogramming support, there is one entry for each partition supported. 



Bytes 104-105 (X'68'-X'69') of the partition communication region contain 
the address of the OC Option Table. Label OCTAB Identifies the first byte 
of the table. 



INTERVAL TIMER OPTION TABLE 







ITTAB 








BG 


\ 




F4 


\ 




F3 


S, V \ 




F2 


I \ 




a ° 


z 


Fl 




r 


Subtask 


a / 






1 "V 




Subtask 


/ 




Subtask 


/ 



3 


4 7 


TECB 

— Address 

IT routine 


Compl.ofTECB 


Save Area , 



Bytes 0-3 : 



No TECB or STXIT 
Issued 

TECB issued 

STXIT issued 

STXIT issued and 
user routine is 
already in use 

No TECB or STXIT 
issued 

TECB issued 

STXIT issued 



zero 

Address of the timer event control block 

Address of user interval timer routine 

Complement of the user interval timer routine 



Complement of the TECB address 
Address of the user save area 



Note: One table entry is built for each partition supported and an IT Request table 
is also built. 

With timer and asynchronous processing supported, the table always comprises 
15 entries ; the subtask entries occupy the higher address locations in the 
table. 

Bytes 102-103 (X'oo'-XW) of the partition communication region contain 
the address of the IT Option Table. Label ITTAB identifies the first byte of 
the table. 



INTERVAL TIMER REQUEST TABLE 



10 g Task 

q 9. Identifier 



00 FF 00 00 00 



No SETIME issued : 
SETIME issued : 



Bytes 1-4 : No SETIME issued : 



X'OO', the last entry is always X'OO' 

PIK or TIK (X'lO'-X'FO 1 ) of the program or 
task that issued the SETIME macro 

Highest time interval possible (X'FFOOOOOO 1 ) 
The last entry is always X'FFOOOOOO' 

Time interval that will elapse between the 
occurrence of the pending interrupt and the 
time currently contained in SYSTOD (address 
X'54'). The entries are in ascending order of 
magnitude, that is the smallest interval 
appears first. 

The interval corresponding to the currently 
pending interrupt is in SYSTIMER (address 
X'50 1 ) and the key of the respective program 
or task is in TWTIMS 



Note: This table is generated for timer support (IT= YES). 

The number of entries is one more than the number of partitions supported, 
but with timer and asynchronous processing supported, the table always 
comprises 16 entries. 

Bytes 80-83 (X'50'-X'53') of the System Communication region (SYSCOM) 
contain the address of the IT Request Table. Label ITREQ identifies the first 
byte of the table. 



ABNORMAL TERMINATION OPTION TABLE 



-h i 



AB Routine Address 



Save Area Address 



Bytes 0-3 : No STXIT issued : 

STXIT issued and 
rtnaddr parameter 
passed 



Bytes 4-7 : 



No STXIT issued 
or no save area 
parameter passed 

STXIT issued and 
save area para- 
meter passed 



Address of entry point of user's abnormal 
termination routine. If AP (Asynchronous 
Processing) is supported, the maintask and 
subtasks may have the same or different AB 
routines. When a subtask is ATTACHed after 
a STXIT AB macro has been issued by the 
maintask, the subtask will receive the AB 
routine address specified by the maintask only 
if the ATTACH macro for that subtask has the 
ABSAVE parameter specified. The subtask can 
override this by issuing its own STXIT AB macro. 



Address of a 72 -byte save area used by the 
supervisor to store the interrupt status infor- 
mation and the contents of the general regis- 
ters. 



Note: One table entry is generated for each partition supported. 

With asynchronous processing support, the table always comprises 15 entries; 
the subtask entries occupy the higher address locations in the table. 

Bytes 84-87 (X'54 , -X'57') of the System Communication region (SYSCOM) 
contain the address of the AB Option Table. Label ABTAB identifies the 
first byte of the table. 



PAGE FAULT HANDLING OVERLAP OPTION TABLE 



K* 


BG 


F4 


F3 


F2 


Z 
o 


Fl 




Subtask 




Subtask 


Subtask 



e Fault Information 



3 Byte 



Byte : Bit : 1= A page fault from the task is in the Page Queue Table 

Bit 1 : 1= A page fault occuring in a supervisor service of the 
task is queued in the Page Queue Table 

Bits 2-7: Unused 
Bytes 1-3 : Address of the user's page fault appendage routine 

Bytes 4-7 : Page fault information (for detailed layour see Page Queue Table) 

This information is stored here only when a page fault occurs in a 
supervisor service working for the task, while another page fault is 
queued for the task in the Page Queue Table, otherwise zero 

NO SETPFA issued 



Bytes 0-7 : 



Note: PFATAB is only built if PHO=YES was specified in the SUPVR mccro 
at supervisor generation. 

One table entry is generated for each partition supported. With asynchronous 
processing support, the table always comprises 15 entries; the subtask entries 
occupy the higher address locations in the table. 

Label PFATAB identifies the first byte of the table. 



JOB ACCOUNTING INTERFACE COMMON TABLE 



Displacement 


Label 


Description 




(ACCTCOMN) 




-15 


ACCTSVRG 


Temporary register save area 


16-17 


ACCTSVRX 


Save area for remainder of overhead counter 
times distributed by partition on exit 


18-19 


ACCTSVRE 


Save area for remainder of all-bound counter 
times distributed by partitions on entry 


20-23 


ACCTPCNT 


Count of partitions using the Job Accounting 
interface 


24 


ACCTSAID 


Owner of physical transient area *) 


25 


ACCTFAID 


Interrupted program *) 


26 


ACCTRAID 


Active program *) 


27 


ACCTSWCH 


Accounting switches: if bit= l,true ; if bit=0, 
not true 

bit 0: cancel accounting bit 4: IPL indicator 
bit 1: no active partitions bit 5: not used 
bit 2: catalog in process bit 6: not used 
bit 3: alternate label area bit 7: not used 


28-31 


ACCTIME 


Start time of current accounting interval, in 
complement format 


32-33 


ACCTRESC 


Reserved 


34-35 


ACaUSEP 


Address of user save area (ACCTUSER) 


36-37 


ACaUSEL 


Length of user save area (Set with 1st operand 
of FOPT macro parameter JALIOCS) 


38-39 


ACCTSJOB 


Job accounting partition indication 


40-43 


ACaBLES 


Address of BG Job Accounting Table 



If multiprogramming is supported, this table is to be extended with one of the 
following fields (depending on the number of supported partitions), otherwise 
the table ends here. 



44-47 
48-51 


ACCTSEAS 


Address of Fl Job Accounting Table 

Control Field: prevents the accounting routine 
being loaded twice 



NPARTS=3 






44-47 




Address of F2 Job Accounting Table 


48-51 




Address of Fl Job Accounting Table 


52-57 


ACCTSEAS 


Control Field: prevents the accounting routine 
being loaded twice 



s the PIK values for the relevant tasks 



JOB ACCOUNTING INTERFACE COMMON TABLE (. . . .Cont'd) 



Displacement | 



Description 



NPARTS= 4 








44-47 




Address of F3 Job Accounting Table 




48-51 




Address of F2 Job Accounting Table 




52-55 




Address of Fl Job Accounting Table 




56-63 


ACCTSEAS 


Control Field: prevents the accounting 
being loaded twice 


routine 



N PARTS =5 






44-47 




Address of F4 Job Accounting Table 


48-51 




Address of F3 Job Accounting Table 


52-55 




Address of F2 Job Accounting Table 


56-59 




Address of Fl Job Accounting Table 


60-69 


ACCTSEAS 


Control Field: prevents the accounting routine 
being loaded twice 



Byte 124-127(X , 7C'- , 7F') of the system communication region (SYSCOM) contain the 
address of the Job Accounting Interface Common Table. 
Label ACCTCOMN identifies the first byte of the table. 



JOB ACCOUNTING INTERFACE PARTITION TABLE 



Displacement 


Label 


Description 




(ACCTABLE) 




-3 


ACCTWK1 


Work area used in SIO update 


4 -7 


ACCTWK2 


Work area used with ACCTWK1 in start/stop 
time routine 


8 -11 


ACCTSVPT 


Job card pointer; address of job card field 
following jobname 


12 


ACCTPART 


ID of partition in charge (partition switch 


13 


ACCTRES2 


Reserved 


14-15 


ACCTLEN 


Length of SIO area= 6n+l, where n= number 
of devices for this partition in SYSGEN 
option JA= nl,n2,n3,n4,n5) 


16-21 


ACCTLOAD 


Label area instruction; moves JAI label area 
address to OPEN/CLOSE transients 


22-23 


ACCTRES3 


Reserved 


24-27 


ACCTLADD 


Address of alternate label area 


28-31 


ACCTCPUT 


Counter for CPU time elapsed in a jobstep, 
counted in 300th of a second 


32-35 


ACCTOVHT 


Counter for overhead time; time not charged 
to any partition 


36-39 


ACCTBNDT 


Counter for all-bound time; system wait state 
time divided between running partitions 


40-47 


ACCTSVJN 


Save area for job name during simulated EOJ 


48^55 


"ACCTJBNM 


Job name; taken from job card 


56-71 


ACCTUSRS 


User information; 16 bytes from job card 


72-73 


ACCTPTID 


Partition ID: , BG', 'F4', 'F3', 'F2' or 'FT in 
EBCDIC format 


74 


ACCTCNCL 


Cancel code; see Cancel Codes and Messages 


75 


ACaYPER 


Type of record: 'S'= job step, 'L'= last step 
of job 


76-83 


ACCTDATE 


Date in format specified at SYSGEN 
(MM/DD/YY or DD/MM/YY) 


84-87 


ACCTSTRT 


Start time of a job-step, in packed decimal 
(DHHMMSSF ; F = sign) 


88-91 


ACCTSTOP 


Stop time of a job-step in the same format as 
ACCTSTRT. This value is used as the start 
time for the next step 


92-95 


ACCTRES 


Reserved 


96-103 


ACCTEXEC 


Phase name; taken from execute card 



JOB ACCOUNTING INTERFACE PARTITION TABLE (. . . . Cont'd) 



Displacement 


Label 


Description 


104-107 


ACCTHICR 


Real mode : the problem program end address 
reflecting ALLOCR or the SIZE = parameter 
on the EXEC statement 
Virtual mode : the virtual start address of the 
partition incremented by the amount of 
virtual storage referenced during this step 


108-111 


ACCTIMES 


CPU time elapsed in a job-step; counted in 
300th of a second 


112-115 




Overhead time; elapsed time not charged to 
any partition, in 300th of a second 


116-119 




All-bound time; system wait state time divided 
between running partitions, in 300th of a 


120 


ACCTSIOS 


SIO tables: 6bytes for each device specified 
by SYSGEN options, as follows: 2 bytes for 
device address (Ocuu), 4 bytes for count of 
SIO's in current job-step 

Overflow byte: normally X'20', but is X'30' 
if more devices are used within a partition 
than specified by SYSGEN options 



Notes: DSECT ACCTABLE symbolically addresses the JAI Partition Tables with labels 
as shown. Each partition in which JAI is supported has its own JAI Partition 
Table, labeled ACCTBG, ACCTF4, ACCTF3, ACCTF2, ACCTF1, for 
active partitions BG, F4, F3, F2 and Fl respectively. 



The address of this table is ii 
displacement 116 (X'74 1 ) 



the partition Communication Region at 



ASCII EBCDIC TRANSLATION TABLES 



ASCII/EBCDIC (0/0 to 3/2) 



ASCII 


EBCDIC 




Charact. 


Col Row 


Bit Pattern 


Col Row 
(in hex) 


Bit Pattern 


Comments 


NUL 








0000 


0000 





0000 


0000 




SOH 





1 


0000 


0001 


1 


0000 


0001 




STX 





2 


0000 


0010 


2 


0000 


0010 




ETX 





3 


0000 


0011 


3 


0000 


0011 




EOT 





4 


0000 


0100 


3 7 


0011 


0111 




ENQ 





5 


0000 


0101 


2 D 


0010 


1101 




ACK 





6 


0000 


0110 


2 E 


0010 


1110 




BEL 





7 


0000 


0111 


2 F 


0010 


nn 




BS 





8 


0000 


1000 


1 6 


0001 


0110 




HT 





9 


0000 


1001 


5 


0000 


0101 




LF 





10 


0000 


1010 


2 5 


0010 


0101 




VT 





11 


0000 


1011 


B 


0000 


1011 




FF 





12 


0000 


1100 


c 


0000 


1100 




CR 





13 


0000 


1101 


D 


0000 


1101 




SO 





14 


0000 


1110 


E 


0000 


1110 




SI 





15 


0000 


mi 


F 


0000 


nn 




DLE 







0001 


0000 


1 


0001 


0000 




DC1 




1 


0001 


0001 


1 1 


0001 


0001 




DC2 




2 


0001 


0010 


1 2 


0001 


0010 




DC3 




3 


0001 


0011 


1 3 


0001 


0011 




DC4 




4 


0001 


0100 


3 C 


0011 


1100 




NAK 




5 


0001 


0101 


3 D 


0011 


1101 




SYN 




6 


0001 


0110 


3 2 


0011 


0010 




ETB 




7 


0001 


0111 


2 6 


0010 


0110 




CAN 




8 


0001 


1000 


1 8 


0001 


1000 




EM 




9 


0001 


1001 


1 9 


0001 


1001 




SUB 




10 


0001 


1010 


3 F 


0011 


nn 




ESC 




11 


0001 


1011 


2 7 


0010 


0111 




FS 




12 


0001 


1100 


1 C 


0001 


1100 




GS 




13 


0001 


1101 


1 D 


0001 


1101 




RS 




14 


0001 


1110 


1 E 


0001 


1110 




US 




15 


0001 


mi 


1 F 


0001 


nn 




SP 


2 





0010 


0000 


4 


0100 


0000 




1 


2 


1 


0010 


0001 


4 F 


0100 


nn 


Logical OR 




2 


2 


0010 


0010 


7 F 


0111 


nn 




/ 


2 


3 


0010 


0011 


7 B 


0111 


1011 




S 


2 


4 


0010 


0100 


5 B 


0101 


1011 




% 


2 


5 


0010 


0101 


6 C 


0110 


1100 




& 


2 


6 


0010 


0110 


5 


0101 


0000 






2 


7 


0010 


0111 


7 D 


0111 


1101 




( 


2 


8 


0010 


1000 


4 D 


0100 


1101 




) 


2 


9 


0010 


1001 


5 D 


0101 


1101 






2 


10 


0010 


1010 


5 C 


0101 


1100 




+ 


2 


11 


0010 


1011 


4 E 


0100 


1110 




t 


2 


12 


0010 


1100 


6 B 


0110 


1011 




- 


2 


13 


0010 


1101 


6 


0110 


0000 


Hyphen, Minus 




2 


14 


0010 


1110 


4 B 


0100 


1011 




'/ 


2 


15 


0010 


nn 


6 1 


0110 


0001 







3 





0011 


0000 


F 


nn 


0000 




1 


3 


1 


0011 


0001 


F 1 


nn 


0001 




2 


3 


2 


0011 


0010 


F 2 


nn 


0010 





ASCII EBCDIC TRANSLATION TABLES( 


...Cont'd) 


ASCII/EBCDIC (3/3 to 6/6) 


ASCII 


EBCDIC 




Charact. 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 












(in hex) 








3 


3 


3 


0011 


0011 


F 


3 


1111 


0011 




4 


3 


4 


0011 


0100 


F 


4 


mi 


0100 




5 


3 


5 


0011 


0101 


F 


5 


mi 


0101 




6 


3 


6 


0011 


0110 


F 


6 


mi 


0110 




7 


3 


7 


0011 


0111 


F 


7 


nn 


0111 




8 


3 


8 


0011 


1000 


F 


8 


mi 


1000 




9 


3 


9 


0011 


1001 


F 


9 


nn 


1001 






3 


10 


0011 


1010 


7 


A 


0111 


1010 






3 


11 


0011 


1011 


5 


E 


0101 


1110 




< 


3 


12 


0011 


1101 


4 


C 


0100 


1100 




= 


3 


13 


0011 


1101 


7 


E 


0111 


1110 




> 


3 


14 


0011 


1110 


6 


E 


0110 


1110 




? 


3 


15 


0011 


mi 


6 


F 


0110 


nn 




@ 


4 





0100 


0000 


7 


C 


0111 


1100 




A 


4 


1 


0100 


0001 


c 


1 


1100 


0001 




B 


4 


2 


0100 


0010 


c 


2 


1100 


0010 




C 


4 


3 


0100 


0011 


c 


3 


1100 


0011 




D 


4 


4 


0100 


0100 


c 


4 


1100 


0100 




E 


4 


5 


0100 


0101 


c 


5 


1100 


0101 




F 


4 


6 


0100 


0110 


c 


6 


1100 


0110 




G 


4 


7 


0100 


0111 


c 


7 


1100 


0111 




H 


4 


8 


0100 


1000 


c 


8 


1100 


1000 




1 


4 


9 


0100 


1001 


c 


9 


1100 


1001 




J 


4 


10 


0100 


1010 


D 


1 


1101 


0001 




K 


4 


11 


0100 


1011 


D 


2 


1101 


0010 




L 


4 


12 


0100 


1100 


D 


3 


1101 


0011 




M 


4 


13 


0100 


1101 


D 


4 


1101 


0100 




N 


4 


14 


0100 


1110 


D 


5 


1101 


0101 




O 


4 


15 


0100 


1111 


D 


6 


1101 


0110 




P 


5 





0101 


0000 


D 


7 


1101 


0111 




Q 


5 


1 


0101 


0001 


D 


8 


1101 


1000 




R 


5 


2 


0101 


0010 


D 


9 


1101 


1001 




S 


5 


3 


0101 


0011 


E 


2 


1110 


0010 




T 


5 


4 


0101 


0100 


E 


3 


1110 


0011 




U 


5 


5 


0101 


0101 


E 


4 


1110 


0100 




V 


5 


6 


0101 


0110 


E 


5 


1110 


0101 




w 


5 


7 


0101 


0111 


E 


6 


1110 


0110 




X 


5 


8 


0101 


1000 


E 


7 


1110 


0111 




Y 


5 


9 


0101 


1001 


E 


8 


1110 


1000 




z 


5 


10 


0101 


1010 


E 


9 


1110 


1001 




L 


5 


11 


0101 


1011 


4 


A 


0100 


1010 




\ 


5 


12 


0101 


1100 


E 





1110 


0000 


Reverse Slant 


] 


5 


13 


0101 


in 


5 


A 


0101 


1010 




-. 


5 


14 


0101 


1110 


5 


F 


0101 


nn 


Logical Not 


_ 


5 


15 


0101 


mi 


6 


D 


0110 


1101 


Underscore 


- 


6 





0110 


0000 


7 


9 


0111 


1001 


Grave accent 


a 


6 


1 


0110 


0001 


8 


1 


1000 


0001 




b 


6 


2 


0110 


0010 


8 


2 


1000 


0010 




c 


6 


3 


0110 


0011 


8 


3 


1000 


0011 




d 


6 


4 


0110 


0100 


8 


4 


1000 


0100 




e 


6 


5 


0110 


0101 


8 


5 


1000 


0101 




f 


6 


6 


0110 


0110 


8 


6 


1000 


0110 





ASCII EBCDIC TRANSLATION TABLES( 


...Cont'd) 


ASCII/EBCDIC (6/7to7/15) 


ASCII 


EBCDIC 




Charact. 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 


g 


6 7 


0110 


0111 


8 


7 


1000 


0111 




h 


6 8 


0110 


1000 


8 


8 


1000 


1000 




: 


6 9 


0110 


1001 


8 


9 


1000 


1001 




j 


6 10 


0110 


1010 


9 


1 


1001 


0001 




k 


6 11 


0110 


1011 


9 


2 


1001 


0010 




I 


6 12 


0110 


1100 


9 


3 


1001 


0011 




m 


6 13 


0110 


1101 


9 


4 


1001 


0100 




n 


6 14 


0110 


1110 


9 


5 


1001 


0101 




o 


6 15 


0110 


mi 


9 


6 


1001 


0110 




P 


7 


0111 


0000 


9 


7 


1001 


0111 




q 


7 1 


0111 


0001 


9 


8 


1001 


1000 






7 2 


0111 


0010 


9 


9 


1001 


1001 




s 


7 3 


0111 


0011 


A 


2 


1010 


0010 




t 


7 4 


0111 


0100 


A 


3 


1010 


0011 




u 


7 5 


0111 


0101 


A 


4 


1010 


0100 




v 


7 6 


0111 


0110 


A 


5 


1010 


0101 




w 


7 7 


0111 


0111 


A 


6 


1010 


0110 




x 


7 8 


0111 


1000 


A 


7 


1010 


0111 




y 


7 9 


0111 


1001 


A 


8 


1010 


1000 




z 


7 10 


0111 


1010 


A 


9 


1010 


1001 




{ 


7 11 


0111 


1011 


c 





1100 


0000 




1 


7 12 


0111 


1100 


6 


A 


0110 


1010 


Vertical Line 


I 


7 13 


0111 


1101 


D 





1101 


0000 




7 14 


0111 


1110 


A 


1 


1010 


0001 


Tilde 


DEL 


7 15 


0111 


mi 





7 


0000 


0111 




EBCDIC 


ASCII 




Charact 


Col Row 


Bit Pattern 


Col Row 


Bit Pc 


Jttern 


Comments 




(in hex) 














NUL 





0000 


0000 








0000 


0000 




SOH 


1 


0000 


0001 





1 


0000 


0001 




STX 


2 


0000 


0010 





2 


0000 


0010 




ETX 


3 


0000 


0011 





3 


0000 


0011 




HT 


5 


0000 


0101 





9 


0000 


1001 




DEL 


7 


0000 


0111 


7 


15 


0111 


nn 




VT 


B 


0000 


1011 





11 


0000 


1011 




FF 


C 


0000 


1100 





12 


0000 


1100 




CR 


D 


0000 


1101 





13 


0000 


1101 




SO 


E 


0000 


1110 





14 


0000 


1110 




SI 


F 


0000 


mi 





15 


0000 


nn 




DLE 


1 


0001 


0000 







0001 


0000 




DC1 


1 1 


0001 


0001 




1 


0001 


0001 




DC2 


1 2 


0001 


0010 




2 


0001 


0010 




DC3 


1 3 


0001 


0011 




3 


0001 


0011 




BS 


1 6 


0001 


0110 





8 


0000 


1000 




CAN 


1 8 


0001 


1000 




8 


0001 


1000 




EM 


1 9 


0001 


1001 




9 


0001 


1001 




FS 


1 C 


0001 


1100 




12 


0001 


1100 




GS 


1 D 


0001 


1101 




13 


0001 


1101 




RS 


1 E 


0001 


1110 




14 


0001 


1110 




US 


1 F 


0001 


nn 




15 


0001 


nn 





EBCDIC to ASCII (X'OO'to'lF') 



ASCII EBCDIC TRANSLATION TABLES(.... Cont'd) EBCDIC to ASCII (X'25toX'93') 



EBCDIC 


ASCII 




Charact. 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 




(in 


lex) 
















LF 


2 


5 


0010 


0101 





10 


0000 


1010 




ETB 


2 


6 


0010 


0110 


1 


7 


0001 


0111 




ESC 


2 


7 


0010 


0111 


1 


11 


0001 


1011 




ENQ 


2 


D 


0010 


1101 





5 


0000 


0101 




ACK 


2 


E 


0010 


1110 





6 


0000 


0110 




BEL 


2 


F 


0010 


mi 





7 


0000 


0111 




SYN 


3 


2 


0011 


0010 


1 


6 


0001 


0110 




EOT 


3 


7 


0011 


0111 





4 


0000 


0100 




DC4 


3 


C 


0011 


1100 


1 


4 


0001 


0100 




NAK 


3 


D 


0011 


1101 


1 


5 


0001 


0101 




SUB 


3 


F 


0011 


mi 


1 


10 


0001 


1010 




SP 


4 





0100 


0000 


2 





0010 


0000 




C 


4 


A 


0100 


1010 


5 


11 


0101 


1011 






4 


B 


0100 


1011 


2 


14 


0010 


1110 




< 


4 


C 


0100 


1100 


3 


12 


0011 


1100 




( 


4 


D 


0100 


1101 


2 


8 


0010 


1000 




+ 


4 


E 


0100 


1110 


2 


11 


0010 


1011 




1 


4 


F 


0100 


nn 


2 


1 


0010 


0001 


Logical OR 


& 


5 





0101 


0000 


2 


6 


0010 


0110 




] 


5 


A 


0101 


1010 


5 


13 


0101 


1101 




S 


5 


B 


0101 


1011 


2 


4 


0010 


0100 




* 


5 


C 


0101 


1100 


2 


10 


0010 


1010 




) 


5 


D 


0101 


1101 


2 


9 


0010 


1001 




; 


5 


E 


0101 


1110 


3 


11 


0011 


1011 




-, 


5 


F 


0101 


nn 


5 


14 


0101 


1110 


Logical Not 


- 


6 





0110 


0000 


2 


13 


0010 


1101 


Hyphen, Minus 


/ 


6 


1 


0110 


0001 


2 


15 


0010 


nn 




1 


6 


A 


0110 


1010 


7 


12 


0111 


1100 


Vertical Line 


, 


6 


B 


0110 


1011 


2 


12 


0010 


1100 




% 


6 


C 


0110 


1100 


2 


5 


0010 


0101 






6 


D 


0110 


1101 


5 


15 


0101 


nn 


Underscore 


>^ 


6 


E 


0110 


1110 


3 


14 


0011 


1110 




? 


6 


F 


0110 


nn 


3 


15 


0011 


nn 






7 


9 


0111 


1001 


6 





0110 


0000 


Grave accent 




7 


A 


0111 


1010 


3 


10 


0011 


1010 




* 


7 


B 


0111 


1011 


2 


3 


0010 


0011 




@ 


7 


C 


0111 


1100 


4 





0100 


0000 






7 


D 


0111 


1101 


2 


7 


0010 


0111 




= 


7 


E 


0111 


1110 


3 


13 


0011 


1101 






7 


F 


0111 


nn 


2 


2 


0010 


0010 




a 


8 


1 


1000 


0001 


6 


1 


0110 


0001 




b 


8 


2 


1000 


0010 


6 


2 


0110 


0010 




c 


8 


3 


1000 


0011 


6 


3 


0110 


0011 




d 


8 


4 


1000 


0100 


6 


4 


0110 


0100 




e 


8 


5 


1000 


0101 


6 


5 


0110 


0101 




f 


8 


6 


1000 


0110 


6 


6 


0110 


0110 




g 


8 


7 


1000 


0111 


6 


7 


0110 


0111 




h 


8 


8 


1000 


1000 


6 


8 


0110 


1000 




i 


8 


9 


1000 


1001 


6 


9 


0110 


1001 




i 


9 


1 


1001 


0001 


6 


10 


0110 


1010 




k 


? 


2 


1001 


0010 


6 


11 


0110 


1011 




l 


9 


3 


1001 


0011 


6 


12 


0110 


1100 





ASCII EBCDIC TRANSLATION TABLES (. . . .Cont'd) EBCDIC to ASCII (X'94' to X'F9') 



EBCDIC 


ASCII 




Charact. 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 




(in hex) 
















m 


9 4 


1001 


0100 


6 


13 


0110 


1101 




n 


9 5 


1001 


0101 


6 


14 


0110 


1110 




o 


9 6 


1001 


0110 


6 


15 


0110 


nn 




P 


9 7 


1001 


0111 


7 





0111 


0000 




q 


9 8 


1001 


1000 


7 


1 


0111 


0001 






9 9 


1001 


1001 


7 


2 


0111 


0010 




<\s 


A 1 


1010 


0001 


7 


14 


0111 


1110 


Tilde 


s 


A 2 


1010 


0010 


7 


3 


0111 


0011 




t 


A 3 


1010 


0011 


7 


4 


0111 


0100 




u 


A 4 


1010 


0100 


7 


5 


0111 


0101 




v 


A 5 


1010 


0101 


7 


6 


0111 


0110 




w 


A 6 


1010 


0110 


7 


7 


0111 


0111 




X 


A 7 


1010 


0111 


7 


8 


0111 


1000 




y 


A 8 


1010 


1000 


7 


9 


0111 


1001 




z 


A 9 


1010 


1001 


7 


10 


0111 


1010 




i 


C 


1100 


0000 


7 


11 


0111 


1011 




C 1 


1100 


0001 


4 


1 


0100 


0001 




B 


C 2 


1100 


0010 


4 


2 


0100 


0010 




C 


C 3 


1100 


0011 


4 


3 


0100 


0011 




D 


C 4 


1100 


0100 


4 


4 


0100 


0100 




E 


C 5 


1100 


0101 


4 


5 


0100 


0101 




F 


C 6 


1100 


0110 


4 


6 


0100 


0110 




G 


C 7 


1100 


0111 


4 


7 


0100 


0111 




H 


C 8 


1100 


1000 


4 


8 


0100 


1000 




1 


C 9 


1100 


1001 


4 


9 


0100 


1001 




> 

J 


D 


1101 


0000 


7 


13 


0111 


1101 




D 1 


1101 


0001 


4 


10 


0100 


1010 




K 


D 2 


1101 


0010 


4 


11 


0100 


1011 




L 


D 3 


1101 


0011 


4 


12 


0100 


1100 




M 


D 4 


1101 


0100 


4 


13 


0100 


1101 




N 


D 5 


1101 


0101 


4 


14 


0100 


1110 




O 


D 6 


1101 


0110 


4 


15 


0100 


nn 




P 


D 7 


1101 


0111 


5 





0101 


0000 




Q 


D 8 


1101 


1000 


5 


1 


0101 


0001 




R 


D 9 


1101 


1001 


5 


2 


0101 


0010 




\ 


E 


1110 


0000 


5 


12 


0101 


1100 


Reverse Slant 


S 


E 2 


1110 


0010 


5 


3 


0101 


0011 




T 


E 3 


1110 


0011 


5 


4 


0101 


0100 




U 


E 4 


1110 


0100 


5 


5 


0101 


0101 




V 


E 5 


1110 


0101 


5 


6 


0101 


0110 




W 


E 6 


1110 


0110 


5 


7 


0101 


0111 




X 


E 7 


1110 


0111 


5 


8 


0101 


1000 




Y 


E 8 


1110 


1000 


5 


9 


0101 


1001 




Z 


E 9 


1110 


1001 


5 


10 


0101 


1010 







F 


mi 


0000 


3 





0011 


0000 




1 


F 1 


mi 


0001 


3 


1 


0011 


0001 




2 


F 2 


mi 


0010 


3 


2 


0011 


0010 




3 


F 3 


mi 


0011 


3 


3 


0011 


0011 




4 


F 4 


mi 


0100 


3 


4 


0011 


0100 




5 


F 5 


nn 


0101 


3 


5 


0011 


0101 




6 


F 6 


nn 


0110 


3 


6 


0011 


0110 




7 


F 7 


nn 


0111 


3 


7 


0011 


0111 




8 


F 8 


nn 


1000 


3 


8 


0011 


1000 




9 


F 9 


nn 


1001 


3 


9 


0011 


1001 





SEGMENT AND PAGE TABLE 



STAB (Segment table 



X'FO 



Address of 
Page Toble 



Address of 
Page Table 



Address of 
Page Table 



Addre,, „. 
Page Table 



Each entry in the seg- 
ment table corresponds 
to one 64K segment of 
virtual storage (Bit 31 
is invalid bit) 



One page fable is 
built for each seg- 
ment of virtual sto- 
rage and contains 
32 two-byte entries 



PT (Page Table) 



Bytes and 1 : Bit 

Bits 0-12 

Bits 8-11 
Bit 13 

Bit 14 
Bit 15 



1= Address of any byte in the corresponding page 
is invalid 

Leftmost 13 bits of address of page in real 
storage if bit 13= 

Storage key of corresponding partition if bit 13= 1 

0= Page is in real storage 
1= Page is not in real storage 

Always zero 

Used bit: 

0= Page must be read from page data set 

(a valid copy of the page is on the page data set) 
1= Page need not be read from page data set 

(no valid copy of the page on the page data set) 

Note: Bits 4-7 may contain PIK/16 of partition which requires PFIXing of the page 
currently located in corresponding page frame. The page must be PFIXed in a 
reserved page frame in the correct real partition. 

Bytes 208-211 (X'DO'-X'DS') of the System Communication Region (SYSCOM) 

contain the address of the Segment Table. 

Label STAB identifies the first byte of the Segment Table. 

Label PT identifies the first byte of the Page Table. 



PAGE QUEUE TABLE 




PGQU 






^ 










c 




8 

























Page Address 





Byte : Bits 0-3 : Bits 0-3 of PIK or TIK (if AP supported) of user task 

Bits 4-7: B'0000' Page Translation Exception 

B'1000* Dummy Request 

B'OIOO' PFIX Request 

B'0010' TFIX Request 

B'OOOl' GETREAL Request 

Bytes 1 -2 : Leftmost 16 bits of the address of the page (which is also the address 
of the page frame, if GETREAL) to be handled; the remaining 8 bits 
of the address are assumed to be zero 

Byte 3 : Task identifier (PIK or TIK) of user task or, task identifier (select byte 
in STID field) of system task 



Note: Label PGQU identifies the first byte of the table 

Bytes 28-31 (X'lC'-X'lF 1 ) of the RASLINK area contain the address of the 
Page Queue Table 



PAGE FRAME TABLE 



I i 



12 3 4 5 6 7 



Bytes and 1 : 

Bits 0-10: Counter for temporary fixes (tfix counter) 

Bit 11 : Reserved for later use 

Bit 12 : 1= PF IX request (into another page frame) pending for the page (NFF bit) 

Bit 13 : If on, page frame is unusable (hardware failure, DRAP bit) 

Bit 14 : If 0, page frame belongs to selection pool (SP bit) 

Bit 15 : 1= PF IX (different page) or GETREAL request pending for the page frame 

(NF bit) 
Bytes 2 and 3: Pointer to next page frame in queue or to queue header if last element 

in the queue (all page frames in selection pool are queued) 

Bytes 4 and 5: If the frame is occupied: the page number (the virtual address of the 
page divided by 2048); if unused X'FFFF' 

Bytes 6 and 7: Pointer to the previous frame in the queue or to queue header if first 

element in the queue (all page frames in the selection pool are queued) 

Note: The page frame table is built at supervisor generation time and contains 

one 8-byte entry for each 2K block of real storage (page frame) as 
specified in the RSIZE parameter of the VSTAB macro. 

Bytes 212-215 (X'D4'-X , D7') of the System Communication Region 
(SYSCOM) contain the address of the Page Frame Table. 
Label PFT identifies the first byte of the table. 



PAGE FRAME TABLE EXTENSION 



For each Page Frame Table entry in the system there is a 1-byte entry in the Page 
Frame Table Extension. Each entry is a counter for the number of times a page has 
been permanently fixed in the page frame (PFIX counter) 

Bytes 216-219 (X'DS'-X'DB 1 ) of the System Communication Region (SYSCOM) 
contain the address of the Page Frame Table Extension. 
Label PFTX identifies the first byte of the table. 



1 3 4 5 7 



Byte : 
Bytes 1 -3: 
Byte 4 : 



Byte 5-7 



TIK (identifier of task that issued the PAGEIN macro). 

Pointer to a list of areas that are to be paged in. 

bit : 1 = PAGEIN request has been completed 

bit 1 : reserved 

bit 2 : 1 = one or more of the requested pages are outside 

the requesting program's partition 
bit 3 : 1 = one or more negative length specifications 

were detected 
bit 4-7: reserved 

Pointer to ECB (if used) or zero. 



The number of entries is determined at supervisor generation time. 
Label PAGETAB identifies the first byte of the table. 



SELECTION POOL IDENTIFIERS AND QUEUE HEADERS 



Q00 
Q10 
HQ 
Q01 
Qll 











s 


Queue Identifiers 








1 




P 














P 

















P 


















P 


X 












8. 




P . 












w 






" 



F : Pointer to first PFT entry in queue 
L : Pointer to last PFT entry in queue 
P : Initially these pointers are as drawn. They may be changed by queue switching. 



Note: 

The Queue Headers are located directly behind the Page Frame Table. 
Each Queue Header is 8 bytes long. 

Bytes 2 and 3 contain a pointer to the first queue entry and bytes 6 and 7 
contain a pointer to the last queue entry. 



TRANSLATION CONTROL BLOCK (TCB) 




CCWTCB1 (BG) 








CCWTCB2 (F4) 






V 


CCWTCB3 (F3) 


Z 


L j 




CCWTCB(n-l) 
(subtask) 








CCWTCB (n) 
(subtask) 





Flag 
byte 


used 

by 

BTAM 


TIK/PIK 


Pointer to 
Status Modifier 
List 


Pointer to 

Control Com'd 

List 


Pointer to 
TIC line 


Pointer to 

Copy Block 

End 


Address of 
copied CCB 
(for cancel) 


Number of 
free IDA words 
in IDAL block 



28 




47 


48 51 


52 




107 


108 111 


Work Area's 


Address of 
last TF IX 
request 


Save Area 
(registers 2-F) 


Pointer to 

next used 

TCB 



If fast CCW translation is specified 
(FASTTR=YES), bytes 52-131 are 
changed to: 



Pointer to 
DIDAL chain 


Address of 
current 
DIDAL 


Number of 
DIDAL's 
in use 


Number of 

free DIDAL 

entries 


Address of 

current 

DIDAL entry 



Virtual 
CCW 
address 


Save Area 
(Registers 2-F) 


Pointer to 

next used 

TCB 



TRANSLATION CONTROL BLOCK (TCB) (....Cont'd) 



Byte 1: 



Bytes 4-7: 



bit 0=1: data chaining specified 

1=1: Read/Sense command specified 

2=1: Read backward command specified 

3=1: Status modifier command with data chaining 

4=1: Status modifier command only 

5-6 : Reserved 

7=1: REPLICA creation flag (fast CCW translation) 

Number of copy blocks needed in addition to those 
required for current CCW-translation request. 

Pointer to Status Modifier List belonging to handled 
device. Zero if device does not support Status Modifier 
commands . 



Bytes 8-1 1 : Pointer to Control Command List belonging to 

handled device. Zero if device does not support 
Control Commands with data area. 

Bytes 12-15: Chain of knots of tree structure caused by TIC 

following Status Modifier command. Zero if no 
knots exist in CCW chain. 

Bytes 16-19: Chain of knots build because Status Modifier 

command is last one fitting in CCW copy block. 
Zero if no Status Modifier commands at end of 
CCW copy blocks. 



Note: One TCB is generated for each partition supported. With asynchronous processing support 15 TCB's are generated. 

To locate the TCB (associated with the partition/task), add X'50' to the address of the System Save Area (displacement X'09' of the appropriate PIB). 
Labels CCWTCB 1- CCWTCBn identify the first byte of the appropriate TCB. 



COPY BLOCKS 

The copy blocks are located at the end of the supervisor nucleus. 
Each block is 72 bytes long and is used to store one of the following: 

• One CCB plus some additional information (CCB copy block), or 

• Up to seven copied CCW's and pointers (CCW copy block), or 

• One or more Indirect Data Address Lists (IDAL block). 

Chains are formed for both the occupied and the free copy blocks. The occupied blocks 
are chained by means of pointers in the CCB copy blocks. The address of the first CCB 
copy block in the chain is contained in the field ACCBB, which is located at the be- 
ginning of the channel program translation routine (CCWTADR). 

The address of CCWTADR is contained in the System Communication Region (SYSCOM), 
bytes 132-135 (X'&M'-X'o?'). 

The free copy blocks are chained by means of pointers in the copy blocks. The address 
of the first copy block in the chain is contained in the first AFCB. 



| VIRTUAL STORAGE | 



REAL STORAGE 



"T" 



Original CCB 



I/O Area's 




page 
boundary 




Note: The DIDAL and REPLICA blocks are created by the fast CCW translation routin* 



COPY BLOCKS (....Cont'd) 
Layout of CCB Copy Block 



| , 


2 


3 


4 


5 


6 


7 


CCBCNT 


CCB 
COM1 


CCB 
COM2 


CCB 
STA1 


CCB 
STA2 


CCB 
CLS * 


CCB 
LNO 


CCBCCW 

Address of first CCW 


CCBBY3 


CCBCSWW 


CCBSENS 

Sense CCW if any 


CCBPIK 
User PIK 


CCB 
FLAG** 


Unused 


CCBVA 

Virtual Address of CCB 


CCBACB 

Address of first CCW copy block in 

channel program 


CCBICB 

Address of first IDAL block in channel 

program 


CCBXINF (Fix information; 24 bytes) 

Each bit in this field represents one page frame. 

If a bit is on, the associated page frame contains 

a page fixed for this I/O request. If more than 
384K of real storage are available, the address 

in CCBXPTR will point to any additional field 

which contains bits for the page frames beyond 384K 


CCBXPTR 

Address of additional Fix information 


CCBNEXT 

Address of next CCB copy block 



If fast CCW translation is specified 



(FASTTR=YES), the last twelve 
bytes of the block are changed to: 


CCBRCB 

Address of REPLICA block 


CCBFPT 

Forward chain pointer 


CCBBPT 

Backward chain pointer 



* Set to X'20" (=copied CCB) 
** Legend CCBFLAG: Bit 0: 



Indicates that CCW-translation of this request 
is complete; indicator is set before I/O request 
is enqueued in channel queue. 
Indicates that at least one time during CCW- 
translation control has been transferred to 
TFIX routine. 

in case TTFIX is scan through CCBXINF for 
freeing pages is skipped. Indicator is set 
Immediately before control is transferred to 
TFIX routine. 
Unused. 

Indicates that the next CCW-translation request 
from BTAM is from the BTAM channel appendage. 
This indicator is set immediately after 1st time 
request from BTAM has been completed. 
Valid for fast translation. 
CCB copy block is on saved CCB queue. 
Data area pages require fixing. 
Unused. 
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COPY BLOCKS (....Cont'd) 
Layout of CCW Copy Block 





| 1 | 2 | 3 


4 1 5 | 6 | 7 





1st Copy location for CCW 


8 


2nd Copy location for CCW 


16 


3rd Copy location for CCW 


24 


4th Copy location for CCW 


32 


5th Copy location for CCW 


40 


6th Copy location for CCW 


48 


7th Copy location for CCW 


56 


X'80'* 


X'OOOOOO' 


Virtual address of first CCW in the 
Copy block 


64 


X'88'** 


X'000000' 


Address of next CCW Copy block in 
the chain 



X'80' indicates the end of the CCW copy locations in the block. 

It is replaced by a TIC (Transfer in Channel command) if the 7th copy 

location contains a copied CCW with data- or command chaining. 

Bytes 57-59 will then point to the copy location of the CCW following 

the CCW in the 7th copy location. 

Bytes 56-59 will not be changed if the CCW in the 7th copy location 

is a TIC. 

X'88' indicates the last 8-byte entry in the block. It is replaced by a 
TIC if the CCW in the 7th copy location is a status modifier CCW. 
Bytes 65-67 will then point to the copy location of the second CCW 
following the status modifier CCW. 



MAIN REPLICA BLOCK 



VCCBA 


RCCBA 


TIMTEST 


REPPIK 


REPLCNT 1 CCWSTRL 


REPDIDAL 


REPDCB 


CC 


B 

24 Bytes) 




(16 or 




CCW1 


CCW2 


CCW3 


REPFPT | REPBPT | 


REPNEXT 



ADDITIONAL REPLICA BLOCK 



Legend: 

VCCBA - Virtual CCB address 

RCCBA - Address of copied CCB 

TIMEST - Timestamp 

REPPIK - Partition Identification Key 

REPLCNT - The number of tasks currently testing this REPLICA 

for a match with their channel program 

CCWSTRL - Length of CCW string (number of CCW's) 

REPDIDAL - Address of DIDAL block 

REPDCB - Pointer to chain of DIDAL blocks 

REPFPT,REPBPT - Pointers used for chaining REPLICA 's 

(forward and backward pointer) 

REPNEXT - Pointer to (next) additional REPLICA block 



DIDAL BLOCK 



DIDAL ENTRY 



VIRTUAL ADDRESS 


FLAG 
BYTE* 


POINTER TO 
REAL LOC.** 



FLAGBYTE: bit - indicates that TFIXing is not 
is not neccessary because the 
page has already been TFIXed 
for this request, 
bit 7 - indicates that TFIX request for 
this entry has been completed. 

Real location (either copied CCW or IDA word) 
that should contain the translated I/O area address. 

: Points to (next) additional DIDAL. 
Contains 4X'00' in last DIDAL. 



BOUNDARY BOX 





BBOX 


*?* 


General Entry 


iii 


BG Entry 




F4 Entry 


3-gl. 


F3 Entry 


n 5'~ 

33R 


F2 Entry 


si! 


Fl Entry 



End Address of Real Storage 


Number of 


Number of 






or Address of PDAID 


Page Frames 


Page Frames 


Begin Address of 


End Address of 


alternate area/ SDAID 


In smallest 


in Main Page 


Virtual Address Area 


Virtual Address Area + 1 


buffer area 


Real Partition 


Pool 










3 


4 7 8 11 


12 15 


Begin Address of 
Real Partition 


End Address of 
Real Partition + 1 


Begin Address of 
Virtual Partition 


End Address of 
Virtual Partition + 1 


1 


These values are inserted at IPL time and (e-'.cept 
Gen.entry) may be changed by ALLOCR 


These values are inserted at system generation time 
and (except Gen.entry) may be changed by ALLOC 



Notes: If a partition is not allocated, its-beginning- and end address are identical with the beginning address of the following partit 
Bytes 220-223 (X'DC'-X'DF 1 ) of the System Communication Region (SYSCOM) contain the address of the Boundary Box. 
Label BBOX identifies the first byte of the table. 



CONVERTING VIRTUAL TO REAL ADDRESS 



Instruction Addre 



9 B | 6 [ 



/ 




W~ 


/ 


1 63 L 


lU 


Seqme 


ntno. 


Paqe no . 


Byte Displacement 


1001 


1011 


0110 0300 0000 0000 


-'' 


9 


Bv'< 


C 


\ 



I 10 0110 11:00 I 1 1 1 OQlQ | 










STOR 

Control Register 1 

|0B006F40| 







SEGMENT TABLE 
Segment (X'00 1 ) 



Segment 1 (X'OT) 



Segment 2 (X'02 1 



Segment 153(X'99') 



Segment 154(X'9A') 



Segment 155(X'9B') 
E000E680 



X'E693 

♦ [H 



PAGE TABLE 



Page 1 (X'OT] 



Page ll(X'OB') 
0469 



Page 12(X'0C') 
0329 



PageSKX'lF' 



32 PAGE I 
entries [Tl] 

for one(l) 
64 K Segment 



XVIAO (X , 6F40'+X'26C') 



m 



, , , Page Table Entry 

| 0000 0011 0010 ijooi | < 

,0 12, _— --- 



| 0000 0011 0010 lJQOQ 0000 0000 | 
K3 T213 231 



m 



Note : Values used in the figure are hypothetical . 
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PAGE DATA SET FORMAT 



Virtual Disk Format 3330 





« 

2048 bytes 


2048 bytes 


12288 by 
2048 bytes 


es 

2048 bytes 


2048 bytes 


► 

2048 bytes 


9 Head 
x 00 
X 

1 o' 


X'0000' 


X'0800' 


X'1000' 


XM800' 


X'2000' 


X'2800' 


X'3000' 












f i 02 


X'6000' 












x 5 






6 x X'800' = 
( 1 tr 


X'3000' bytes 
ack) 






1 ' 8 


X'36000' 










X'38FFF' 



Virtual Disk Format 3340 





«« 

2048 bytes 


6144 bytes 
2048 bytes 


»> 

2048 bytes 


c:Head 
x° 00 


X'0000' 


X'0800' 


X'1000' 


» 01 
8 


X'1800' 






fl 02 


X'3000' 






ii 3- 

X? 


2 


3 xX'800' = X'1800' bytes 
( 1 track) 




8 11 


X' 10 800' 




X'llFFF' 



PAGE DATA SET FORMAT (....Cont'd) 



Virtual Disk Format 2314 





< 


6144 bytes 


► 










Head 
00 


X'0000' 


X'0800' 


X'1000' 


01 


X'1800' 






02 


X'3000' 










3x X'800' = X'1800' bytes 
( 1 track ) 




19 


X'1C800' 




X'lDFFF' 



-1 cylinder: 20 x X'1800' bytes = X'lEOOO' byte; 



RESOURCE USAGE RECORD TABLE (RURTAB) 



=RUR for Proc. Library 



SYSOPEN =RUR for VSAM Open 
routine 



=RUR for Label Cylinder 



=RURfor IJSYSRS File 



SYS IX L =RUR for VSAM Index 
Build 



Format of 
.any RUR 



SYSSPM =RUR for VSAM Space 
Manager 



SYSMCO =RUR for VSAM Master 
Catalog Routine 



SYSCTLG =RUR for VSAM Master 
Catalog 



SYSVTOC =RURforall VTOCs 



SYSSPLIT =Used for VSAM 



=Used for VSAM 



Dummy RUR indicating 
'pool exhausted' 



rship bits^ 



Ownership bits 
for Job Control 



- Flags 



RUR for a Named Resource 



Unique Name of a Named Resource 



(Pool for RURs of Named Resources) 



RESOURCE USAGE RECORD TABLE (RURTAB) (.. .Cont'd) 



Byte : 



1= Another task waiting for this resource 
1= Resource shared among owners indicated 
1= Resource used exclusively by indicated task 
1= Shared or exclusive use 



Byte 1 : Used by Job Control to indicate that the resource is to be held for the 
duration of a [ob. 

Bit 2: 1= TIK or PIK is X'50' 

Bit 3: 1 = TIK or PIK is X'40' 

1=TIK or PIK is X'30 1 

1 = TIK or PIK is X'20* 

l=TIKor PIK is X'10' 



Byte 2 : 

BitO: 
Bit 1: 
Bit 2: 



1=TIK is X'FO' 
1=TIK is X'EO' 
1=TIK is X'DG" 
1=TIK is X'CO" 
1 = TIK is X'BO" 
1 = TIK is X'AG" 
1 = TIK is X'90' 
1 = TIK is X'80' 



Byte 3 : 



BitO: 
Bit 1: 
Bit 2: 
Bit 3: 
Bit 4: 
Bit 5: 
Bit 6: 
Bit 7: 



1=TIK is X'70' 
1=TIK is X'60' 
1=TIK or PIK is X'50' 
1= TIK or PIK is X'40' 
1 = TIK or PIK is X'30' 
1= TIK or PIK isX'20' 
l=TIKorPIK is X'10' (BG) 
1=T1K or PIK isX'OO' (Attention) 



For explanation of TIK and PIK see Task Interrupt Key and Partitic 
Identification Key. 

Label RURTAB identifies the first byte of the table. 



ANCOR TABLE (ANCHTAB) 



End address 
of Anchor 
Table 



-4 bytes- 



Used for VSAM 
AMCBS pointer 



-4 bytes - 



Used for VSAM 
OAL pointer 



1st Entry 



2nd Entry 



50th Entry 



format of 
J^ any entry 



Load 
point 



Entry 
point 



Length 
of phase 



Byte 16: 

Status Switch 

X'00' = Phase must be loaded 

X'7F' = Phase is already in storage 

X'FF' = Requested phase is just loaded 

by another task (only is AP=YES) 



The Anchor Table is located at the beginning of the GETVIS area in the virtual partition. 



LAYOUT of SHARED VIRTUAL AREA (SVA) 





0. 


.3.4. . .7 







VLT 




8 


VDSA 


VLSA 




10 


VLNA 


VLEA 




18 




TB 




20 












V 


D s= 








j AL 






S VL ? 






- GV s: 





Field 


Length 


Content 


VLT 


8 


Date + time SVA has been 
updated (note 1) 


VDSA 


4 


Start address of the System D 
Directory List 


VLSA 


4 


Start address of the virtual 
library (note 2) 


VLNA 


4 


Address of next available 
location in SVA 


VLEA 


4 


Address of end of the SVA 


TB 


10 


Communications area for 
Job Control and $MAINDIR 


VD 


up to 32 K 


System Directory List 

(note 3) 


AL 


<8 


Alignment bytes for doubleword 
boundary 


VL 


any 


Virtual library containing re- 
entrant and relocatable phases 


GV 


any 


GETVIS area for the system 
(starts on page boundary) 



Note 1 : As one of the tests to determine whether a warm start copy of the SVA is 
available, job control compares this entry after IPL against the date and 
time in the SOL descriptor entry. 

Note 2 : Address of first doubleword aligned byte after SDL. 

Note 3 : The layout of this area is compatible with a directory block in the Core 
Image Library. The SDL has fixed length entries of 34 bytes. The last 
entry contains 8X'FF' as phasename. 



FETCH TABLE (FTTAB) 



layout 

entry in 
Fetch 
Table / 






1 3 


4 5 


6 7 


8 13 


14 19 


c 


A(SLD) 


TC 


BT 


Cataldir 


Llnkdir 



Byte 



Byte; 1 -3 : 

Bytes 4-5: 
Bytes 6-7: 
Bytes 8-13: 



Condense counter (incremented for each condense of the 
library . Reset to zero when a new library is assigned - 
PC IL only) 

Address of the corresponding Second Level Directory 
(zero if no SLD present) 
Number of tracks per cylinder 
Number of library blocks per track 
Address of directory of cataloged phases in the form 
BBCCHH 

Bytes 14-19: Address of Linkarea in the form BBCCHH (zero if no 
Linkarea present) 



The address of the FETCH TABLE is contained in bytes 240-243 (X'FO'-'FS') 
of the System Communication region (SYSCOM) . 
Label FTTAB identifies the first byte of the table. 

The entries for the partitions will not exist if the support for Private Core 
Image Libraries is not included in the Supervisor. 



LAYOUT of DIRECTORY ENTRY 



7 8 1011112 ldl4ldl<1718 2021 23 2425 2^27 29 3C 31 33 



Bytes 0-7 


Phase 


name 


Bytes 8-10: 


TTR 


Relative track address and record number of phase (note 2) 


Byte 11 • 


N 


Number of halfwords containing user data 


Bytes 12-13 


TT 


Number of text blocks 


Bytes 14-15 


LL 


Number of text bytes in last text block 


Byte 16 


1 


Switch indicating type of phase 
X'80 1 : selfrelocating phase 
X'40' : relocatable phase 
X'20' : SVA eligible 
X'10" : phase is in the SVA (note 1) 
X'08' : phase found in a PC1L (note 1) 
X'04 1 : phase not found (note 1) 
X'02' : active entry (filled in) 
X'01 ' : not used 


Byte 17 


T 


Always X'00' (used as type byte for stow table) 


Bytes 18-20 


PPP 


Load point at LNKEDT time (note 3) 


Bytes 21-23 


EEE 


Entry point at LNKEDT time (note 3) 


Bytes 24-25 


RR 


Number of RLD items (note 4) 


Byte 26 


R 


Number of additional RLD blocks (note 4) 


Bytes 27-29 


AAA 


Partition start address at LNKEDT time (note 4) 


Byte 30 


C 


Condense counter at the time when entry was 
activated (note 6) 


Bytes 31-33 


VEE 


Entry point of phase in SVA (notes 1 and 5) 



Note 1 : Only used for directory entries that are in storage . 

Note 2 : The TTR is relative to the beginning of the directory. 

Note 3 : PPP and EEE are not present if both are zero and the phase is not relocatable. 

Note 4 : RR, R and AAA are only present if the phase is relocatable. 

Note 5 : VEE is only present if the phase is SVA eligible. 

Note 6 : Condense counter is used for incore directory entries (not SDL) 



Note : The last entry in the directory is a 12-byte entry with a dummy phasename 

(contains 8X'FF'), a dummy TTR (contains XL3'00') and a dummy N (contains 
X'00 1 ). Directory entries in storage always have the standard length of 34 
bytes (including the last entry). 



RELATIONSHIP between DIRECTORY and its SECOND LEVEL DIRECTORY 



Second Level Directory 





NN 


fc 




HN1 


Directory 




TRACK 1 


HN2 




1 » 


HN3 




TRACK 2 












TRACK 3 








TRACK 4 




TRACK 5 









Field 


Length 


Content 


NN 
HN 


2 

8 


Number of entries 
Highest phase name on 
corresponding directory track 



Note : Track 4 and 5 are not used. 



DIRECTORY SEARCH SEQUENCES (INCLUDING SDL CONSIDERATION) 





Options 


Directories 




SDL 


DE 
or 
LDL 


SYS 


PCIL 


LINK 


SLD 


SCIL 
LD 


PSLD 


PCIL 
LD 


DE 
LDL 


SDL 


1 


No 


No 


No 


No 


No 


1 ! 










2 


No 


No 


No 


No 


Yes 


2 i 1 










3 


No 


No 


No 


Yes 


No 


2 ! 


1 








4 


No 


No 


No 


Yes 


Yes 


3 


2 


1 






5 


No 


No 


Yes 


No 


No 


1 










6 


No 


No 


Yes 


No 


Yes 


1 ! 2 










7 


No 


No 


Yes 


Yes 


No 


1 j 


2 








8 


No 


No 


Yes 


Yes 


Yes 


1 ! 


r 2 


3 " 






9 


No 


Yes 


No 


No 


No 


2 i 








10 


No 


Yes 


No 


No 


Yes 


3 2 








11 


No 


Yes 


No 


Yes 


No 


3 


2 








12 


No 


Yes 


No 


Yes 


Yes 


4 


3 


2 






13 


No 


Yes 


Yes 


No 


No 


2 










14 


No 


LYes 


Yes 


No 


Yes 


2 


3 










15 


No 


Yes 


Yes 


Yes 


No 


2 




3 








16 


No 


Yes 


Yes 


Yes^j 


Yes 


2 




3 


4 






17 


Yes 


No 


No 


No 


No 


2 










1 


18 


Yes 


No 


No 


No 


Yes 


3 J 


1 




2 


19 


Yes 


No 


No 


Yes 


No 


3 


; l 






2 


20 


Yes 


No 


No 


Yes 


Yes 


4 


2 


1 




3 


21 


Yes 


No 


Yes 


No 


No 


2 ! 






1 


22 


Yes 


No 


Yes 


No 


Yes 


2 ,3 






1 


23 


Yes 


No 1 


Yes 


Yes 


No 


2 : 3 






1 


24 


Yes 


No 


Yes 


Yes 

No 1 


1 Yes 


2 • 3 ; 4 




1 


25 


Yes 


Yes 


No _j 


1 No 


3 _ 

4 








2 


26 


Yes 


'Yes 


No 


No 


Yes 


2 






3 


27 


Yes 


Yes 


No 


Yes 


No 


4 2 






3 


28 


Yes 
Yes 


Yes 


No 


Yes 


Yes 


5 


3 


2 




4 


29 


Yes 


Yes 


No 


No 


3 









2 


30 


Yes 


Yes 


Yes 


No 


Yes 


3 


4 




2 


31 


Yes 


Yes 


Yes 


Yes 


No 


3 


, 4 






2 


32 


Yes 


Yes 


Yes 


Yes 


Yes 


3 


i 4 


5 




2 



VTAM ADDRESS VECTOR TABLE (ISTAVT) 



Label 


Length 


Description 


ISTACVT 


4 


Address of Communications vector table in VTAM 
partition 


ISTAS49 


4 


SVC 49 code routine address 


ISTAS53 


4 


SVC 53 code routine address 


ISTAPSTA 


4 


Address of APS table 


ISTTXTSZ 


4 


Address of size of text record 


ISTAPSEX 


4 


Address of APS disposition exit 


ISTPHNM 


5 


Phase name 


ISTX1 


1 


Used for TOLTEP to save the condition code 


ISTARID 


2 


Address of RID 


ISTATRT 


2 


Address of VTAM gates in resource table 


ISTAGTWT 


2 


Address of gatewait routine 


ISTVTTP 


2 


Address of SVC 1 1 routine 



Bytes 96-99 (X'oOJ-X^ 1 ) of the system communication region (SYSCOM) contain 
the address of the VTAM Address Vector Table. 



ENTRY IN THE ASYNCHRONOUS PROCESS SCHEDULER (APS) OPTION TABLE 



Label 


Length 


Description 


APSFLAG 
VTAMFLAG 


1 
11 

1 

3 


X'80' =Exit requested 

Reserved 

X'01' = Subtask runs in supervisor state 

X'04' = VTAM SVC active 

X'02' = VTAM appendage active 

X'08' = VTAM user exit in control 

X'lG" = VTAM timer delay 

Reserved 



ROUTINE IDENTIFIERS (RID) 



NAME 


ID 


MEANING 


ACTION 


SYSTEMID 


00 


System error condition, for 
example, page fault in I/O 
interrupt handler 


Hard Wait 


REENTRID 


04 


Page fault or GETREAL request 


Save PSW and regs to 






in a reenterable routine 


user task's system save 
area, set PIB DAT 
flag to call 
SVRETURN, and 
ENOU request 


USERTID 


08 


Page fault from a disabled user 


Cancel user task error 






task or disabled B-transient 


code X'15'. 


APPENDID 


OC 


Page fault in I/O appendage 


Cancel usertask error 






routine 


code X'36'. 


RESVCID 


10 


Page fault in SVC 29 or 47 


Set saved PSW to re- 
issue SVC when task 
is dispatched, ENQU 
page fault request. 


DISPID 


14 


Page fault in a routine which 


ENQU page fault 






requires no information to be 


request. 






saved, for example, a page 








fault in the dispatcher. 




PFARID 


16 


Page fault in a page fault 


Cancel user task error 






appendage routine 


codeX'15'. 




47 


Request for a page which is to 


Save PSW and registers 




thru 


be PFIXed. RID identifies the 


to user task's system save 




4F 


partition which issued the PF IX 


area, set PID DAT flag 






request. Used only if AP=YES. 


to call INITSVCwhen 
task is dispatched next. 


G41BND 


53 


Page fault in the reusable 






SVC 41 or 42. 


Close gate to routine 
(routine cannot be used 


G58BND 


71 


GETREAL request from the 






reusable SVC 58. 


until gate is opened). 
ENQU page request. 
(Any task trying to use 
a gated resource is 
placed in a wait state 
and marked resource 
bound. It is released 
from the wait state 
when the resource is 
ungated after the page 
request has been 
handled. ) 



CHAPTER V 

DOS/VS SERVICE AIDS 



System Generation Requirements 
The following System Generation rr 



o parameters apply to PDAIDS: 



Macro 


Parameter 


Remarks 


FOPT 


jNOl 
PD=^YES> 


The PD parameter must be specified if the problem deter- 
mination programs (PDAIDS) are desired. 
PD= YES specifies that a minimum of 1400 bytes is reserved 
for this function. Any amount between 1400 and 10,240 
bytes may be specified for n. 



The PDAIDS routines must be catalogued in the Core Image Library. 
Linkage Edit statements: 

INCLUDE IJBPDAID 
/* 
// EXEC LNKEDT 

INCLUDE IJBPDLST 
/* 
// EXEC LNKEDT 



INITIALIZATION 

After linkage editing PDAIDS routines into the Core Image Library, the initializer 

program is loaded with standard DOS/VS job control statements. 

The statement: // EXEC PDAID causes the initializer to be loaded. The initializer 

types out the first keyword PDAID= and opens the keyboard for a response. 

A choice can be made at this point to enter the parameters from the printer keyboard 

or from SYSIPT via cards. Following is a description of each of these methods: 

Initialization via card: 

1 Punch desired keywords and parameters into cards. (See PDAID control state- 
ments table for the appropriate PDAID functions, in this chapter). 

Entries may be punched one- per- card,or multiple entries(separated by commas) 
can be made in a single card. An entry may not be split between two cards. 
All 80 columns of a card may be used,but a card is terminated by the first blank 
following an entry, or a GO entry. The last entry of the last card must be GO 
and the last card must be followed by a /* card. 

2 Place keyword entry card(s) in SYSIPT. 

3 Respond to the SYSLOG message PDAID= by pressing only the END key on the 
printer keyboard. 

4 The initializer reads cards from SYSIPT until the GO entry is encountered. 
Note : If a wrong parameter is encountered on a card, corrections are requested on 



Initialization via printer keyboard: 

1 Enter one of the parameters (IT,FT,TD,GT, QT, VT or VP) indicating the 
specific PDAID function you want to initiate. 

2 The initializer will respond with the next keyword: 

Respond with the appropriate parameter 
(See PDAID control statements table for the appropriate PDAID functions, 
in this chapter). 

The initializer will continue to prompt with the appropriate keywords until 
all options have been satisfied or a GO response is received, whereupon 
defaults are selected for any remaining options. 

Pressing the END key in response to any keyword causes selection of the 
default option and causes the initializer to respond with the next option 
available. 

4 The sequence in which keywords are prompted depends on previous responses. 
Because AAA is valid only in core-wrap mode, it does not occur unless the 
response to "OUTPUT DEVICE= " is END(key). (which selects core-wrap 
mode by default). 

Because "IGNORE DEVICE/SVC= " and "TRACE DEVICE/SVC= " are mutually 
exclusive, "TRACE DEVICE/SVC= " is prompted only after a default response 
to "IGNORE DEVICE/SVC= " . 

TERMINATION 



Any PDAID function can be terminated by re-initializing the PDAID program with 

the job control statement: //EXEC PDAID 

and responding to the message PDAID with XX. 

It is also possible to reset one function by loading another. 

Note: If the PDAID function is terminated and an alternate area was assigned for 
core-wrap mode before this area is released to the main page pool, the 
contents of this area is printed on SYSLST. 

If SYSLST is unassigned,the printout of this area is suppressed and the 
content of this area will be destroyed. 

PDAID FUNCTIONS 



1 I/O Trace 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


U 


IT: Initiate I/O trace 
XX: Terminates 


None 

Function 

continues 


OUTPUT DEVICE= 
(note 1) 


fcuu I 
IX'cuu'l 
|END [ 

[go J 


Specif iy the hexadecimal channel 
and unit number of either a mag- 
netic tape unit or a printer for 
the output device of the PDAID. 


Core -wrap 
mode 


AAA= 
(note 1) 


[fell 


nK: Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode.* 
The value n must be an even inte- 
ger. If not an even integer, n+1 is 
taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
mode, 
using PD- 
save area 



1 I/O Trace ( Continued) 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


IGNORE DEVICE= 
(note 2) 


|END [ 
LlGO J 




Specify the hexadecimal channel 
and unit number of the device to 
be ignored by I/O trace. 
Note: A maximum of 3 may be 
specified. 


Trace all 
devices 


TRACE DEVICE= 


[f*wll 

|END f 

LIgo J 




Specify the hexadecimal channel 
and unit number of the device to 
be traced by the I/O trace. 
Note: A maximum of 3 may be 
specified. 


Trace all 
devices 


GO (valid 
SYSIPTparameter) 




GO terminates the PDAID con- 
trol input and uses the default 
for those options that are not spe- 
cified. 


None 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive. 
Note 2: TRACE DEVICE and IGNORE DEVICE are mutually e 



2 Fetch/Load trace 








SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


{?*} 


FT: Fetch/Load trace 


None 




XX: Terminates 


Function 








continues 


OUTPUT DEVICE= 


rcuu l 


Specify the hexadecimal channel 


Core -wrap 


(note 1) 


IX'cuu'l 


and unit number of either a mag- 


mode 




|END f 


netic tape unit or a printer for 






Igo J 


the output device of the PDAID. 




AAA= 


[f nK 11 


nK: Specifies the number (n) of 


Core -wrap 


(note 1) 


END 


"K" bytes to be allocated as al- 


mode, 




LlGO J J 


ternate area for core-wrap mode.*) 


using PD- 






The value n must be an even in- 


save area 






teger. If it is not an even integer, 








n+1 is taken. 








*) This area will be taken from 








the main page pool. 




TRACE 


[fSP ] 




SP: Supervisor 


Trace all 


PARTITION= 


BG 




BG: Background 


partitions 




F4 




F4: Foreground 4 


and the 




F3 




F3: Foreground 3 


supervisor 




F2 




F2: Foreground 2 






Fl 




Fl: Foreground 1 






END 










LlGO J 









Fetch/Load Trace ( Continued) 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


GO (Valid 
SYSIPT parameter) 




GO terminates the PDAICfcontrol 
input and uses the default for 
those options that are not speci- 
fied. 


None 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive. 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


IS} 


GT: GSVC trace 


None 




XX: Terminates 


function 








continues 


OUTPUT DEVICE= 


rcuu ] 


Specify the hexadecimal channel 


Core-wrap 


(note 1) 


JX'cuu'l 


and unit number of either a mag- 


mode 




]END [ 


netic tape unit or a printer for 






[GO J 


the output device of the PDAID. 




AAA= 


fnK ] 


nK: Specifies the number (n) of 


Core -wrap 


(note 1) 


< END> 


"K" bytes to be allocated as al- 


mode 




LgoJ 


ternate area for core-wrap mode.*) 
The value n must be an even inte- 
ger. If it is not an even integer, 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


using PD- 


TRACE 


rrsp i 


1 


SP: Supervisor 


Trace all 


PART IT 1 ON = 


BG 




BG. Background 


partitions 




F4 




F4: Foreground 4 


and the 




F3 




F3: Foreground 3 


supervisor 




F2 




F2: Foreground 2 






Fl 




Fl: Foreground 1 






END 










LI GO J 


J 






IGNORE SVC= 


ff nn 11 


Specify the hexadecimal SVC num- 


Trace all 


(note 2) 


END 


ber to be ignored by the GSVC 


SVC's 




LIgoJJ 


trace. Amaximum of 6 may be spe- 
cified. 




TRACE SVC= 


rr nn n 


Specify the hexadecimal SVC num- 


Trace all 


(note 2) 


END 


ber to be traced by the GSVC 


SVC's 




LIgoJJ 


trace. A maximum of 6 may be spe- 
cified. 




GO (valid 




GO terminates the PDAID control 


None 


SYSIPT parameter) 




input and uses the default for 
those options that are not speci- 
fied. 





GSVC Trace ( Continued) 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive. 
Note 2: TRACE SVC and IGNORE SVC are mutually exclusive 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


® 


QT: QTAM Trace 
XX: Terminates 


None 

Function 

continues 


OUTPUT DEVICE^ 
(note 1) 


fcuu "I 
Ix'cuu'l 
]END [ 
IGO J 


Specify the hexadecimal channel 
and unit number of a magnetic 
tape unit for the output device 
of the PDAID. 

Note: A printer is invalid for 
QTAM trace. 


Co re -wrap 
mode 


AAA= 
(note 1) 


JnK | 
<END> 

LgoJ 


nK: Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode.*) 
The value n must be an even in- 
teger. If it is not an even integer 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
using PD- 


TRACE 
PARTITION= 


TSP ' 

BG 

F4 
JF3 
]F2 

Fl 

END 
AGO. 




SP: Supervisor 
BG: Background 
F4: Foreground 4 
F3: Foreground 3 
F2: Foreground 2 
Fl: Foreground 1 


Traceall 
partitions 
and the 
supervisor 


IGNORE DEVICE= 
(note 2) 


'fcuu y 

JX'cuu'l 
)END f 
.[GO J. 




Specify the hexadecimal channel 
and unit number of the device to 
be ignored by the QTAM trace. 
A maximum of 3 may be specified 


Trace all 
devices 


TRACE DEVICE^ 
(note 2) 


]END f 
AGO J. 




Specify the hexadecimal channel 
and unit number of the device to 
be traced by the QTAM trace. 
A maximum of 3 may be specified 


Trace all 
devices 


GO (valid 
SYSIPT parameter) 




GO terminates the PDAID control 
input and causes the default for 
those options that are not speci- 
fied. 


None 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive. 

Note 2: TRACE DEVICE and IGNORE DEVICE are mutually exclus 



SYSLOG message SYSLOG response 
SYSIPT parameter SYSIPT operand 



Meaning 



Default 



H 



VT : VTAM Trace 
XX : Terminates 



Function 
continues 



OUTPUT DEVICE= 
(note 1) 



X'cuu 
END 
GO 



Specify the hexadecimal channel 
and unit number of a magnetic 
tape unit for the output device 
of the PDAID. 

Note : A printer is invalid for 
VTAM trace. 



Core -wrap 



AAA= 
(note 1) 



(nK 

{end 
Igo 



nK : Specifies the number (n) of Core-wrap 
"K" bytes to be allocated as al- mode, 
ternate area for core-wrap mode.*) using PD- 
The value n must be an even in- save area 
teger. If it is not an even integer 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 



TRACE 
PARTITlON= 



SP : Supervisor 
BG : background 
F4 : Foreground 4 
F3 : Foreground 3 
F2 : Foreground 2 
Fl : Foreground 1 

Only SVCs 49 and 53 a 
recorded per partition 



Trace all 
partitions 
and the 
supervisor 



IGNORE DEVICE^ 
(note 2) 



(X'cuu' 
END 
GO 



Specify the hexadecimal channel 
and unit number of the device to 
be ignored by the VTAM trace. 
A maximum of 3 may be specified. 



TRACE DEVICE = 
(note 2) 



1 X'cuu 1 
END I 
GO 



Specify the hexadecimal channel 
and unit number of the device to 
be traced by the VTAM trace. 
A maximum of 3 may be specified 



Trace all 
devices 



GO (valid 
SYSIPT parameter) 



GO terminates the PDAID control 
input and causes the default for 
those options that are not speci- 
fied. 



Note 1 : OUTPUT DEVICE and AAA are mutually exclusive. 

Note 2 : TRACE DEVICE and IGNORE DEVICE are mutually exclusive. 



VTAM BUFFER pool trace 



SYSLOG message 


SYSLOG reponse 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 




PDAID= 


H 


VP : VTAMBUFFER pool trace 


None 




W 


XX : Terminates 


Function 
continues 


OUTPUT DEVICE= 


fcuu ] 


Specify the hexadecimal channel 


Core-wrap 


(note 1) 


Jx'cuu'l 


and unit number of a magnetic 


mode 




[END f 


tape unit for the output device 






IGO J 


of the PDAID. 

Note : For VTAM BUFFER pool 
trace only a magnetic tape unit 
is valid. 




AAA= 


f nK l 


nK : Specifies the number (n) of 


Core -wrap 


(note 1) 


<END> 


"K" bytes to be allocated as al- 


mode, 




[GOj 


ternate area for core-wrap mode . *) 


using PD- 






The value n must be an even in- 


save area 






teger. If it is not an even integer 








n+1 is taken. 








*) This area will be taken from 








the main page pool. 




TRACE 




'SP "j 




SP : Supervisor 


Trace all 


PARTITlON= 




BG 




BG : background 


partitions 






F4 




F4 : Foreground 4 


and the 






F3 1 




F3 : Foreground 3 


supervisor 






F2 f 




F2 : Foreground 2 








Fl 




Fl : Foreground 1 








END 












.GOJ 




Only SVCs 49 and 53 are 






"" 


recorded per partition 




IGNORE DEVICE^ 




fcuu 


jl 


Specify the hexadecimal channel 


Trace all 


(note 2) 




JX'cuu 
)END 




and unit number of the device to 
be ignored by the VTAM trace. 


devices 






[GO . 


y 


A maximum of 3 may be specified. 




TRACE DEVICE= 




fcuu 


fl 


Specify the hexadecimal channel 


Trace all 


(note 2) 




X'cuu 
UND 




and unit number of the device to 
be traced by the VTAM trace. 


devices 






[go 


JJ 


A maximum of 3 may be specified. 




GO (valid 




GO terminates the PDAID control 


None 


SYSIPT parameter) 




input and causes the default for 
those options that are not speci- 
fied. 





Note 1 : OUTPUT DEVICE and AAA are mutually exclusive. 
Note 2 : TRACE DEVICE and IGNORE DEVICE are mutually e 






SYS LOG message 


SYS LOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


{£} 


TD: Transient Dump 
XX: Terminates 


None 

Function 

continues 


OUTPUT DEVICE= 


fcuu 1 
iX'cuu'/ 


Specify the hexadecimal channel 
and unit number of either a mag- 
netic tape unit or a printer for 
the output device of the PDAID. 


None 


GO (valid 




GO terminates the PDAID control 


None 



TAPE TO PRINTER UTILITY PROGRAM (PDA1DLST) 



The tape-to-printer util ity program reads the tape input(created by the PDAID tape 

routines) from SYS 005, and then prints the information on SYSLST in the same format 

that is used by the PDAID print routines. 

The tape-to-printer utility is loaded wITh standard DOS/VS job control statement: 

//EXEC PDLIST 

Input on tape may contain output from more than one PDAID function. 

Note: When tape is used as output device, always reset(terminate) the function before 
executing PDLIST 



Requirements 



DOS/VS System 

Line printer 

At least 6K of page pool 



Linkage Edit Statements 



INCLUDE IJBSDLNK 
// EXEC LNKEDT 



Printer is only output device 

No burst mode device must be running on same channel with printer 

Debugging of printer error recovery routines only possible with 
output class FASTREC 

Only real storage can be dumped 

Time dependent programs may not be debugged 

Alternate Area of PDAID ccnnot be used concurrently 



There are two groups of events : Elementary events and Dedicated events. 
Events appear as program checks. 



Elementary events are : 


Mnemonic 


Event 


BR 


Succssful branching 


IF 


Instruction fetching 


SA 


Storage alteration 


GA 


General register alteration 


TE 


Page translation exception 



The output for the elementary events depends on the specified output class 



SPA I PS (....Cont'd) 



Dedicated events a 



PGMCHK 
PAGENQ 
PAGEHDL 



Program interruption codes X'Ol'-X'OF' , X'10' and X'12' 
Request for page is enqueued 
Request for page is handled 



The events PAGENQ and PAGEHDL are signalled by hooks in the page 
management routines. 

The output for dedicated events is predefined and specific to the event. 



OUTPUT 

Dedicated events 

The following predefined and events specific data is printed : 



Recorded Information 


Dedicated Event 


PGMCHK 


PAGENQ 


PAGEHDL 


Event Mnemonic, Program old PSW, 
Time of day ( usee), Complete supervisor, 
Instruction at time of PGMCHK, Control 
Registers, General purpose registers 


• 






Event Mnemonic, Requestor ID, 

(TE/GETR/TFIX/PFIX) 

Task ID, Virtual address of page to be handled 




• 


• 


Protection key associated with virtual page 
to be handled 




• 


• 


Real address of page frame to which the page 
is assigned 






• 



SDAIDS (....Cont'd) 



The output class (OUTCL) determines the amount of the information 
to be recorded for events BR, IF, SA, GA, and TE. 



Recorded 
Information 


Output Classes 
Mnemonic 


01 


02 


03 


04 


05 


06 


07 


08 


00 


PSW 


GPR 


LOW 
CORE 


COM 
REG 


PAGE 
TAB 


SUPV 


DUMP 
REAL 
NDD 


PDUMP 


FAST 
REC** 


Event IDJprogr 
old PSW,time 
of day( usee) 














*** 






Instruction 
causing event 














*** 






GPR's 




















Low Core 




















Current COMREG 
and SYSCOM 








• 




• 


• 






Control registers 




















Segment-, page- 
and page frame 
tables 










• 


• 


• 






Complete superv 












• 


• 






Complete real 
storage 














• 






Area between vir- 
tual address limits 
















• 




TE-MASK 
PERmask(ctlr9) 
GPR mask (ctlr 9) 
PER start address 

(ctlreg 10) 
PER end address 

(ctlreg 11) 
GPR's 13,14,15, 
0,1,2 


















• 


* Event ID for BR,IF,SA and GA= event mnemonic and instruction address 

Event ID for TE= mnemonic TE and address of the virtual page causing TE 
** FASTREC is an output class that stores the described information into an 

SDAID internal buffer. Information for several events is stored and printed 

as one block 
*** INSTR and PSWare not printed if NDD is forced after STOP ON EVENT VIA 

NDDBYTE X'FF' 



SDAIDS (....Cont'd) 
COMMUNICATION 
Initialization 
Communication with SDAID 



Console 


Operator Action 


Remarks 




//EXEC SDAID [,REAL,SIZE= 12K ] 


SDAID may only be used in a DOS/VS system. If it is initialized 
in a real partition, SIZE parameter is also required. 


4C55D GIVE SPACE FOR SDAID= 


|S] EN °/ ENTER 


SD-area requires at least 6K at page pool. If OUTCL= FASTREC 
is used it is recommended to give at least 8K . 


4C70E DUPLICATE REQUEST FOR 
PDAID AND/OR SDAID 




Use of SDAID and alternate area of PDAID is exclusive. 


4C56E INSUFFICIENT SDAID SPACE, 
REALLOCATE 


Reallocate real partitions 


Message appears only if increasing of the page pool is required. 


4C58D OUTPUT DEVICE= 




X'OOE' 

X'CUU'[,GO] 

GO 


END/ENTER 


Device must be a line printer; No burst mode 
device must be running on the same channel. 


4C60D STOP ON EVENT = 




^[,GO]] END/ENTER 


A wait PSW with address part X'OOOOEEEE' will be loaded. 
The NDD byte may be set to X'FF' to get the non-destroying 
DUMP. Processing continues after pressing the external inter- 
rupt key. 


4C61D EVENT LIMITS= 




rX'000000' .X'FFFFFF' T.GOT 


END/ENTER 


Lower and upper limit of virtual storage to be traced: 
. Instruction address on events BR, IF,TE and GA 
. Altered address on event SA 

If lower limit is higher than upper limit, wrap around occurs. 


TX'LLLLLL' f I 
X'LLLLLL' Lx'hhhhhh' ,GO 

Lgo L J. 
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Remarks 



4C59D OUTCL= 



,GO 



PSW 

GPR 

LOCORE 

COMREG 

PAGETAB 

SUPVISOR 

DUMPREAL _ 

lower a nd upper event limit [ GO] 

GOll 



PDUMP 



, X'aaaaaa' 



ugpj 






X'bbbbbb' 
GO 
,GO 

' PGMCHK 
FASTREC |, AUTOMATIC L 
GO 



f, PGMCHK r __-]] 
, AUTOMATIC L' J 

Loo J 



OUTCL may be specified for events BR,IF,SA,GA and TE. 

For the other events, predefined data is recorded. 

DUMPREAL and PDUMP cause dumping of real storage only. 

FASTREC may be used for printer debugging. 

PGMCHK causes wrap around mode of internal buffer which is 

written out each time a PGMCHK occurs. 

AUTOMATIC causes writing out of the internal buffer if it is full 



END/ENTER 



4C62D EVENT B 



^[go]1end/enter 



Event appears after successful branching. 



4C63D EVENT IF = 



^ [GO] END/ENTER 



Event appears after instruction fetching. 



4C64D EVENT SA= 



COO]] I 



END/ENTER 



Event appears after storage alteration. 



4C65D EVENT GA= 



X'O 1 2 . . . EF' 
NO 



[,GO]J END / ENTER 



Event appears after alteration of one or more specified 
General Purpose Register(s). 
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Communication with SDAID 



Console 


Operator Action 


Remarks 


4C66D EVENT TE= 


[^[,go]]end/enter 


Event appears after page translation exception 


4C67D EVENT PGMCHK= 


£g[, GO]] END/ENTER 


Event appears after PGMCHK interruption with codes 
X'OT-XMO' and X'12 1 . Output is predefined. 


4C68D EVENT PAGENQ= 


ISH 


END/ENTER 


Request for page is enqueued. Event is signalled by a hook in 
Page Management Routine. Output is predefined. 


4C69D EVENT PAGEHDL= 


[no] END/ENTER 


Request for page is handled. Event is signalled by a hook in 
Page Management Routine. Output is predefined. 



*• If GO is entered for a parameter, the dialogue is terminated immediately and defaults (underscored) are taken for the remaining parameters. 
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When the SDAID is initialized, parameters can be changed with the CPU in 
stopped state. 

The procedure (see example) printed at initialization time shows which control 
registers or which locations in real storage have to be altered. 

Example 

These are the parameters that you can change from the console: 

Procedure: Machine in stopped state, hit ALTER/DISPLAY. Examples below: 

To alter ct I reg 9 to 40000000 

....type in AC 9 40000000 END key 

To alter MS location 03CC8C to FF 

....type in AM 03CC8C FF END key 

Printer Address on hex 033480 F ormat 0XXX 

Output Class on hex 033490 Form UUYY 

where IF: UU= 00 FASTREC 

UU=01 PSW 

UU=02 GPR 

UU=03 LOCORF 

UU=04 COMREG 

UU=05 PAGET AB 

UU=06 SUPVISOR 

UU=07 DUMPREAL 

UU=08 PDUMP 

YY=00 Automatic SDBUFFER Output 

YY= FF SDBUFFER Output on PGMCHK 

Stop on Event on hex 003348C X'FF'= YES, X'00'= NO 

Non-destroying Dump on hex 003348E X'FF '= YES 

Event Limits Start Address Ctl Reg A Hex 00XXXXXX ADDR 

End Address Ctl Reg B Hex 00XXXXXX ADDR 

PDump Limits Start Address On hex NNNNNN 00XXXXXX ADDR 

End Address On hex NNNNNN 00XXXXXX ADDR 

SDAID Events To enable - Switch on the BIT/BYTE - 

BR Event Ctl Reg 9 Hex 80000000 BIT 

IF Event Ctl Reg 9 Hex 40000000 BIT 

SA Event Ctl Reg 9 Hex 20000000 BIT 

GA Event Ctl Reg 9 Hex 10000000 BIT 

GPR Mask (0-15) . . Ctl Reg 9 Hex 1000XXXX POSITIONAL 

BITS (see note) 

TE Event Main Storage 033484 Hex FF BYTE 

PGMCHK Event Main Storage 033486 Hex FF BYTE 

PAGENQ Event Main Storage 033488 Hex FF BYTE 

PAGEHDL Event Main Storage 03348A Hex FF BYTE 

Note: SDAID needs external interrupt if printer became unready 

CPU-ID is Hex 0072050301450000 

4057 I SDAID successfully initiated 

Note: see next page for GPR Alteration Masks 
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Control Register 9 , General Purpose Register (GPR) Masks: 
GPR Masks 






80 00 


1 


40 00 


2 


20 00 


3 


10 00 


4 


08 00 


5 


04 00 


6 


02 00 


7 


01 00 


8 


00 80 


9 


00 40 


A 


00 20 


B 


00 10 


C 


00 08 


D 


00 04 


E 


00 02 


F 


00 01 


Termination 





The SDAID is terminated and the SDAREA is released to the page pool, by usin 
either one of the following: 

• The AR (Attention Routine) command ENDSD 

• The Job Control Statement // EXEC ENDSD 



Note: SDAID can be made inactive (elementary events only) by clearing 
control register 9. 

Abort DUMP or PDUMP: Stop line printer and make ready again, then 
hit external interrupt key twice within one second. 



PAGE DATA SET DUMP 



General 



This program should be used in addition t< 
the Page Data Set. 

Control cards may be read from SYSIPT 01 
Continuation cards are not allowed, but i 

CORE IMAGE LIBRARY 

Phase name: PDSDM 

RELOCATABLE LIBRARY 

Module name: IJBPDSDM 



e Dump to dump information from 



entered via SYSLOG. 
lultiple cards may follow. 



Two ways of dumping exist: 

• Dump and select from SYSVIS to SYSLST 

• Dump whole SYSVIS to SYS001 (tape or disk), ther 
to SYSLST lateron. 



elect and print from SYS001 



\ from 


SYSVIS on 
DISK 


SYS001 on 


to N^ 


DISK 


TAPE 


SYS001 


o 

7s 


• 






:> 


• 






SYSLST 


• * 


• * 


• * 



Assign/label requirements: 

from SYSVIS: 

// ASSGN SYS000,X'CUU' 

// DLBL PDSDISK, 'PAGE DATA SET', 99/365, SD 

// EXTENT SYS000,,1,,, 

from SYS001 (disk): 

// ASSGN SYS001,X'CUU' 

// DLBL PDSDISK, 'BACKUP FOR PDS', 99/365, SD 

// EXTENT SYS001,.... 

from SYS001 (tape): 

// ASSGN SYS001,X'CUU' 

// TLBL PDSTAPE, 'BACKUP FOR PDS' 

to SYS001 (disk): 

// ASSGN SYS001,X'CUU' 

// DLBL S01DISK, 'BACKUP FOR PDS', 99/365, SD 

// EXTENT SYS001,.... 

to SYS001 (tape): 

// ASSGN SYS001,X'CUU' 

// TLBL S01TAPE, 'BACKUP FOR PDS' 



PAGE DATA SET DUMP ( . . . .Cont'd) 
To define output device: 

rSYSLSTr/N] 
IU [ SYSOOI J 

meaning: 

TO= SYSLST : from SYSVIS to SYSLST 

TO SYSLST, T : from SYSOOI to SYSLST 

TO= SYSOOI (default) : from SYSVIS to SYSOOI (without selection possibility) 

To select amount of data to be printed 

• Partition ID : Total virtual partition will be dumped 
(BG, Fl, F2, F3orF4) 

• (from, to) : All pages belonging to specified address space will be dumped 
virtual addresses 

• Virtual address : Only one page containing the specified address will bedumped 
Note: The virtual address must be in hex and always 6 bytes long. 

Examples: 

1) Print and select from SYSVIS to SYSLST immediately after IPL : 

// JOB DUMPPDS1 

// ASSGN SYSLST, X'CUU' 

// ASSGN SYS000, X'CUU' 

// DLBL PDSDISK, 'PAGE DATA SET', 99/365, SD 

// EXTENT SYS000,,!,,, 

// EXEC PDSDM 

TO= SYSLST 

F3,F1,03D170 

/* 

/& 

2) Dump all data from SYSVIS to SYSOOI (tape) immediately after IPL : 

// JOB DUMPPDS2 

// ASSGN SYS000, X'CUU' 

// DLBL PDSDISK, 'PAGE DATA SET ', 99/365, SD 

// EXTENT SYS000,,1,,, 

// ASSGN SYSOOI, X'CUU' 

// TLBL SOITAPE, 'BACKUP FOR PDS' 

// EXEC PDSDM 

/* 

/& 

3) Print and select from SYSOOI (disk) to SYSLST 

// JOB DUMPPDS3 

// ASSGN SYSLST, X'CUU' 

// ASSGN SYSOOI, X'CUU' 

// DLBL PDSDISK/BACKUP FOR PDS ', 99/365, SD 

// EXTENT SYSOOI,, 1,,, 

// EXEC PDSDM 

TO= SYSLST,T 

F3,F1,03DI70 

(03A3 91, 03(005), F4 

/* 

/& 

V-18 
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Terminating the dump 

This can be done in any of the three ways given below: 

• Enter EOJ on SYSLOG 

• Having a /* or a /& card at the end of the jobstream when entering 
parameters through SYSIPT 

• Pressing the END key in response to the message: OV21D GIVE 
PARAMETERS after at least one address has been processed 



DUMPGEN AND STAND-ALONE DUMP 



DUMPGEN allows you to generate a stand-alone dump program that must be used 
to obtain information about the system under certain conditions of system 
malfunction. 

The dump consists of a printout of real storage (except bytes X'OG" - X'17', X'40'- 
X'4B", X'BA' - X'BB' and 214 bytes of a non-critical area in the supervisor). 
Two types of dump programs can be generated using DUMPGEN : 

• Translating dump 

• Formatting dump. 

Both programs produce a convential dump with translation. In addition, the 
formatting dump produces a pre-formatted printout of the DOS/VS interface 
tables. This dump is generated if the DUMPGEN option FORMAT=YES is 
specified. 

Executing DUMPGEN 

Before being able to execute DUMPGEN you must catalog it to the core image 
library. Execute it in any partition by the Job control statement or command •. 

// EXEC DUMPGEN 

You enter DUMPGEN and read its control statements from SYSIPT. 

Note that SDAIDS may not be initiated during execution of DUMPGEN. 

The two types of control statements used with DUMPGEN are ASSGN and OPTN, 

described as follows : 

ASSGN Statement : ASSGN defines the output device for the stand-alone 
dump program. 



SYSLST 
X'CUU' 



Name 


Operation 


Operand 


(blank) 


ASSGN 


SYSLST, X'cuu' 



The only valid logical unit assignment. 

Must define the address of the SYSLST Printer. If the ASSGN 

statement is omitted, then X'OOE 1 is assumed. 



OPTN Statement : OPTN defines the type of output generated by the 
DUMPGEN program. 



Name 


Operation 


Operand 


(blank) 


OPTN 


INTR=NO 
YES" 
DECKS=nnnnnn 

PPOOL= NO 
YET 

FORMAT= NO 
YES 

tapeipl= no 
■yes" 



DUMPGEN AND STAND-ALONE DUMP (.. .Cont'd) 

Operands for the DUMPGEN option statement 

INTR YES produces a DUMP program that, when loaded, enters the WAIT 

state. Either press the INTERRUPT button on the CPU operating 
panel to print the output on X'OOE', or press the STOP button and 
then START button of the printer desired for the output device. 
NO produces a DUMP program that, when loaded, prints out the 
contents of real storage either on the SYSLST printer defined with 
the ASSGN statement or on X'OOE". 

DECKS Specifies the number of DUMP card decks (punched out on SYSPCH) 

desired, nnnnnn may be any decimal number from 1 to 99,999,999. 
A blank card separates each deck produced. If DECKS is omitted, 
one deck is produced. 

PPOOL YES produces a dump program that, after printing out real storage, 

will print the formatted contents of the Boundary Box and the 
contents of the real storage in sequence of ascending virtual 
addresses. 
If NO is specified, the last two items are not printed. 

FORMAT YES produces a translating stand-alone dump that formats and 

displays the DOS/VS supervisor tables after displaying the contents 

of real storage. This formatted display depends upon the location 

of the communications region. 

If the communications region cannot be related, the program is 

terminated when the formatted display is to occur. 

In this case the following message is printed on the dump output : 

COULD NOT FIND COMREG BETWEEN CO AND A00, 
FORMATTING WILL NOT OCCUR. 



If the information to be formatted has been destroyed, results are 
unpredictable. 

If NO is specified or FORMAT is omitted, a non-formatting 
translating dump is generated. 

TAPEIPL If YES is specified and SYSPCH is assigned to a tape unit, the 

stand-alone dump written on tape may be IPLed directly from the 
tape unit. 

If NO is specified, or TAPEIPL is omitted and SYSPCH is assigned 
to a tape unit, the stand-alone dump records are written on tape 
preceded by an ASA control character. 

Control statements for the DUMPGEN operands 

Control statements may be specified in any order, however, the following rules 
apply : 

• All statements may be omitted, but if they are, DUMPGEN assigns 

printer X'OOE', INTR=NO, FORMAT=NO, and PPOOL=NO options. 



Only one operation and only o 
allowed. 



j operand per control statement is 



DUMPGEN AND STAND-ALONE DUMP (. . .Cont'd) 
Control statements for the DUMPGEN operands (. . .cont'd) 

• The last statement processed of a duplicate operation overrides all previous 
statements of the same operation with similar operands (if DECKS=2 is 
followed by DECKS=5, five decks are punched). 

• The name field must be blank. 

• Decimal operands may contain leading zeros. 

• One or more blanks must follow the operand if comments are to be made. 
Job stream example 

The following example is a typical job used to create a stand-alone dump. 

//JOB 

// EXEC DUMPGEN 

Col. 2 

ASSGN SYSLST,X'00F' 
OPTN FORMAT=YES 
OPTN PPOOL=YES 
OPTN DECKS=5 
Col.1 

/* 
/& 

Note : If a 3211 is the only printer in your installation, the indexing 

feature should be used with great care; shifting the print line to the 
left or too far to the right causes loss of a certain number of 
characters on each line of the dump. 

DUMPGEN messages 

The functions of DUMPGEN-to-operator error message routines are : 

Cancel the |ob is SYSLOG is not a 3215/3210 or a System/370 Model 
125/1 15 video display unit. 

Reissue the message if operator response is to press the CANCEL key. 

Process an operator response of END/ENTER as IGNORE. 

Cancel the job if operator response is CANCEL. 

Ignore the control card in question when the operator response is 
IGNORE. 

If none of the preceding operator responses is issued, then DUMPGEN assumes 
that a correction has been made and processes it. 
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Stand-alone Dump Program 

This program is generated for your installation using the IBM program DUMPGEN. 

DUMPGEN produces a dump program that is either punched into a card deck or 
stored on magnetic tape. When required, the dump program thus generated can 
be loaded into the system via the standard IPL procedure. 

The stand-alone dump program that is generated by DUMPGEN provides either 
a conventional dump or a formatted dump, depending on the FORMAT option 
used in the DUMPGEN program. 

Operation 

During execution of the stand-alone dump program, a non-critical area in the 
supervisor is used to load the program. The LOAD ADDRESS of the non-critical 
area is punched (in decimal) in the first card of the stand-alone dump card deck 
punched by the DUMPGEN program. Because of this use of the non-critical 
area it is recommended to use the stand-alone program for a system using a 
supervisor that was used for the generation of that dump. 

The conventional dump prints the contents of real storage locations, but does not 
dump the floating point registers. In addition to the areas dumped by the 
conventional dump, the formatted dump prints the DOS/VS interface tables in a 
more readable form. 

For both types of dump the following is printed : 

1 . The contents of the general registers, the old and new PSWs, the interruption 
codes, CSW, CAW, and TIMER. 

2. The contents of real storage in 2K blocks. Each block is preceded by a 
sequence number. 

3. At the end of the real storage dump, page oddress and status information is 
printed that contains the following information for each page frame : 

• The virtual address 

• The real address of the associated page 

• The sequence number of the 2Kb lock 

• Information that indicates whether the contents of the page frames 
has been changed. 

4. The contents of the control registers are printed after page address and 
status information. 

5. Depending on the options selected, the following then occurs : 

If PPOOL=YES 

• The formatted contents of the boundary box is printed after the 
control registers. 

• The contents of real storage is printed in 2K blocks in sequence of 
ascending virtual addresses. 
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Operation (. . . Cont'd) 

If FORMAT=YES 

the formatted contents of the tables listed below are printed at the end of the 

dump . 

PARTITION SAVE AREAS 

COMRE GS 

PIBs 

AP SUBTASK PIBs (if AP supported) 

LUBs 

PCIL LUBs (if PCIL supported) 

PUB 

ERROR RECOVERY BLOCK 

CHANNEL QUEUE 

FLOATING POINT REGISTERS 

COPIES AND TRANSLATED CCB 

FIXINF EXT. BLOCKS 

COPIED AND TRANSLATED CHANNEL PROGRAM 

IDAL BLOCK QUEUE 

FIXINF BLOCK 

BOUNDARY BOX 

SEGMENT TABLE 

PAGE TABLE 

PAGE FRAME TABLE and PAGE FRAME TABLE EXT 

SELECTION POOL 
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This program creates a stand-alone dump program which writes a storage dump 
in a file on tape or disk. This file can be printed during normal system 
operation at the user's convenience. 

The dump program may reside on tape or disk. When the dump program is 
executed, the dump is written onto the same device from which it was IPLed. 

The program produces a copy of virtual storage in virtual page order, and a 
copy of real storage in real page order. Pages which are allocated but paged 
out to SYSVIS are included in the virtual dump. 

The storage dump can be printed either formatted or unformatted. In a 
formatted printout each field identified is printed with certain system control 
blocks. The unformatted printout is only a conventional translated copy of 
storage. 

N ote : 7-track tape drives without data convert are not supported by 
DOSVSDMP. 

Secondary to, or in addition to your established procedures, the following steps 
should be taken when it is necessary to take a stand-alone dump : 

1 . Record any error or status indicators on the system console. 

2. Using ALTER/DISPLAY, record the current PSW, general registers, and 
floating point registers. 

3. Perform the Store Status procedure for your system. 

4. Mount and IPL your dump program tape or disk. 

5. When the system enters a hard wait state, display the current PSW to 
determine the cause. If an error is indicated, notify a systems programmer 
before proceeding. (Refer to DOS/VS Messages for the PSWs). 

6. If message "DOSVSDMP COMPLETED" is displayed, restart DOS/VS and 
prepare to print the dump as soon as the system has been restarted. 

Creating a stand-alone dump program 

Before you can execute DOSVSDMP, it must be cataloged to the core image 
library. The dump program can be generated in a tape resident version or in a 
disk resident version. 

How to create a tape resident stand-alone program 

1 . Select a non-labeled tape to be used as the dump volume. 

2. Execute DOSVSDMP: 
//JOB 

//ASSGN SYS006,TAPE 
// EXEC DOSVSDMP 
/& 

3. When message 4C75D is issued, reply : TAPECREATE. 

4. Message 4C79I indicates that creation of the dump program tape is completed. 

5. Message 4C75D is issued again. Reply : EOJ. 

Refer to DOS/VS Messages for an explanation of the above messages. 
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How to create a disk resident stand-alone dump program 

1 . Select a disk pack to be used as the dump volume. Note that the IPL text on 
the pack will be replaced by the dump IPL text. The selected pack cannnot be 
a system residence volume. 

2. Before you can execute DOSVSDMP, the file which is to hold the dump 
output must be allocated on the selected volume. This file must be named 
DOSDMPF, and begin and end on a cylinder boundary. The size of the file 
is calculated using the following formula : 

N = ((2+V4K)/T) + 2 

where 

N is the number of tracks needed, 

V is the number of pages in the virtual address area, 

R is the number of pages in real storage, 

T is: 3 for 23 1 4/3340 dev ices , 

6 for 3330 devices. 

The result N must be rounded to the next higher number of tracks equivalent 
to the next whole number of cylinders. 

3. Execute DOSVSDMP: 

//JOB 

// ASS GNSYS006, DISK 

// DLBL DOSDMPF, 'filename' 

// EXTENT SYS006, balance of extent information 

// EXEC DOSVSDMP 

/& 

4. When message 4C75D is issued, reply : DISKCREATE 

5. Message 4C79I indicates that creation of the dump program disk is completed. 

6. Message 4C75D is issued again. Reply : EOJ. 

Refer to DOS/VS Messages for an explanation of the above messages. 

Executing the stand-alone dump program 

The program is activated via an IPL of the tape or disk containing the dump program. 
The IPL procedure loads the program into and overlays storage locations X'AOO' to 
X'AFF". Once loaded, the program proceeds to write out storage in virtual page 
order. Following the virtual storage dump, or as a result of an error in attempting to 
dump virtual storage, a dump of real storage in real page order is taken. Upon 
completion of the dump message DOSVSDMP COMPLETED is issued and the system is 
placed in the wait state with a completion code in bits 48 to 63 of the current PSW. 

Printing the stand-alone dump output 

For printing the stand-alone dump output, the program requires at least 36K of 
storage, not including the size of the supervisor. 

1. Execute DOSVSDMP: 

//JOB 

// ASSGN SYS006,device 

//DLBL DOSDMPF, 'filename' 

// EXTENT SYS006,ba lance of extent information 

// EXEC DOSVSDMP 

SYS006 is assigned to the device which contains the dump file. 



/. 
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Printing the stand-alone dump output ( Cont'd) 

2. When message 4C75D is Issued, reply with one of the following optic 



FORMAT 
FORMAT, REAL 



DUMP 
DUMP, REAL 



for a formatted printout of the dump file. 

for a formatted printout and a conventional translated 

printout of real storage following the virtual storage 

printout. 

for an unformatted printout of the dump file. 

for an unformatted printout and a conventional 

translated dump of real storage. 
Message 4C81 I will be issued, indicating the default print selection 
options. 

Then message 4C80D is issued to allow you to change the print selection 
options. The options may be entered separately or as one reply, in which 
case they must be separated by a comma. The options are : 

!YE§| If SYSVIS=YES is specified the pages retrieved 

[ from SYSVIS during the dump will be printed. 

j For unformatted dumps SYSVIS=YES is the only 

NOJ valid option. 

lYESJ If SVA=YES is specified the Shared Virtual Area 

SVA= < > will be printed. 



{ALU If PARTITlON=ALL is specified the supervisor 

and all partitions will be printed. 
\ If PARTITlON=xx is specified the supervisor 

and only the specified partition are printed, 
xx J xx must be a valid partition ID. 

Press END/ENTER to terminate option selection. Message 4C81 I is issued 

to display the selected options. 

When message 4C75D is issued again, repeat step 2 or reply with EOJ. 



This program allows you to make changes to programs cataloged in a 
system or private core image library. 



System requirements 

PDZAP can be executed in any partition. Since PDZAP accesses a core image 
library, other programs running currently should not use the phases PDZAP is 
operating on the same library. SYSLOG must be assigned to the operator 
console. When card input is used, SYSIPT must be assigned to a card reader 
(hopper 1 on 5425/2560). 



Executing PDZAP 

The PDZAP program can be executed from the operator console or from a card 
reader. 



How to execute PDZAP from the operator console 

The following is an example in which the program PROG is used as a phase to be 
modified. 

Call in the program 
// EXEC PDZAP 

The system will respond : 

4C86I IJBPDZAP REL.32.0 program name and version 
4C85A ENTER PHASENAME (XCIL=xxxxxxxx) 

Reply to this message in one of the following ways: 

a. if PROG is in the system core image library enter SCIL=PROG, or 
simply PROG, as SCIL is the default. 

b. if PROG is in the private core image library enter PCIL=PROG. 

When the phase is found, the following messages are issued: 

4C87I LOAD ADDRESS=xxxxxx 

4C88A ADDRESS XXXXXX,OFFSET+XXXXXX,SCAN=XX. .XX,REF=XXXXXX 

Reply to this message in one of the following ways: 

• option 1 specify the hexadecimal address of the data you want 

displayed : 08072A 

• option 2 specify the offset to the reference point of the data you 

want displayed (the initial reference point is the load 
address): +6D4 

• option 3 specify a character string to be searched: SCAN='LABPROG 

• option 4 specify a hexadecimal string to be searched : 

SCAN=D3C1C2D7D9D6C7 

• option 5 set a reference point : REF=08071C. 



PDZAP (...Continued) 

How to execute PDZAP from the operator console (continued) 

If an address is invalid or a string cannot be found, an em 
will be Issued. 

To options 3 and 4 the system will first respond with : 
4C94I SCAN ADDRESS x 



Options 1-4 will result in the display of up to 16 bytes of data in the 
format 



The data printed is contained in a single library block. If less than 16 
bytes are displayed, it is either the end of the program or the end of 
the library block. 

If only a display is wanted, press END/ENTER. 

To modify the displayed data, type in replacement data for the number 
of bytes to be changed. For instance, if the data displayed is : 

4C89D 
05B012110746410000014790B42807F6 

to change the first four bytes to NOP, type in : 

07000700 

The system will respond with message 4C88A again and you can use one 
of the five options mentioned above to display or modify another portion 
of the same phase, or to set another reference point. 

If you are finished with this phase, but want to access another phase, use 

• option 6 terminate processing with this phase by typing 

END PHASE 

Now the program repeats message 4C85A, which allows you to specify the 
name of another phase. 

If you want to terminate the execution of PDZAP, use 

• option 7 end PDZAP operation by typing: END 

/ to execute PDZAP from a card reader 



Executing PDZAP from SYSIPT is the same as from SYSLOG, with the following 
exceptions: 

// UPS I 1 must be specified to indicate card input 
data must be verified before it can be changed. 



PDZAP (...Continued) 



How to execute PDZAP from a card reader (continued) 



//UPS I 1 

// EXEC PDZAP 

SCIL=PROG 

+6D4 

VER=05B0,121l' 

VER=05B01211 

REP-O7000700 

REP=0700,0700 

END 



indicate card input 

call the program 

specify the phase to be accessed 

specifies the position of the data to be 

displayed (option 2) 

specifies the data to be verified; if the data is 

not found, no update will take place 

specifies the data which is to replace the date 

terminates the run 



The format of the VER and REP data can be : 



a hexadecimal string (full bytes, or an even number of digits) 

a set of 2-byte entries, separated by commas 

a character string, preceded by a quote (VER='LABPROG). 



Diagnosing I/O errors 

Verifying I/O device repairs and Engineering Changes 

Checking I/O devices 



Sysrem Generation requirements: 
The following system generatio 



o parameters apply to OLTEP : 



Macro 


Parameter 


Remarks 


FOPT 


OLTEP= YES 


Default value. 


FOPT 


OLTEP= NO 


If OLTEP support is not required. 


FOPT 


OC=YES 


1) Forced when OLTEP= YES is specified. 

2) Allows you to force a communications interval using 
the console interrupt. 


FOPT 


RETAIN= YES 


This option permits the use of the RETAIN/370 function 
of OLTEP. 


FOPT 


RETAIN= NO 


Default value. 


FOPT 


IT=YES 


Will improve the performance of OLTEP in a multipro- 
gramming environment. 


FOPT 


RELLDR=YES 


Relocating load support (Forced when OLTEP= YES) 



JCL TO INVOKE OLTEP 



Statement 


Comments 


// JOB XXXX 


Mandatory. 


//ASSGN SYSnnr^X'cuu' 


One ASSGN statement is necessary for each 
device tested or accessed by a test. None is 
required if the device was permanently assigned. 


// UPSI 01 


This statement is necessary if a console device is 
available but the test run definition is to be ente- 
red via the input Job stream. 


//EXEC IJZADOLT,REAL, 
[SIZE-NK] 


Mandatory, OLTEP will run only in real. 
Size= parameter must be minimum of 14K or 18K 
if RETAIN is invoked. This will allow a 4K OLT 
to execute. If OLTs larger than 4K are to be 
run, the SIZE= parameter must specify a size 
equal to 10K plus the size of the OLT. The size 
specified must be multiple of 2K. 


dev/test/opt/ 


This statement is included if the test-run defini- 
tions are entered via the input job stream. 


/* 


Mandatory. 


/& 


Mandatory. 



;ole, card input must be used. 



TABLE OF OPTIONS 



Option 


Entry 


Description 


Testing 


TL(n) 
NTL 


Recycle the test. If you specify a value (n),OLTEP 
runs the test the number of times indicated. If you 
do not specify a value, the test cycles 10 times. 
The maximum value allowed is 32,767 decimal . 
(See note 1) 


Error Loop 


EL(n) 
EL(I) 
NEL 


Authorizes any error loop coded in the OLT to be 
executed the specified number of times. If you spe- 
cify a value (n),the test loops the number of times 
indicated. If you do not specify a value, the test 
loops the number of times indicated in the preface 
of the OLT. If you specify the character l,a flag is 
set which indicates to the OLT, that it must loop 
indefinitely on the error. You can terminate the 
loop by specifying NEL following a request for com- 
munications. (See note 1) 


Print 


PR 
NPR 


Print messages from the OLT. If you enter NPR, all 
messages originated by the OLT and normally desig- 
nated for SYSLST are supressed.(See note 2) 


Error Print 


EP 
NEP 


Print diagnostic error messages from the OLT. The 

FE option overrides NEP when a first error is encoun- 

tered(once per section). (See note 3) 


Control 
Print 


CP 
NCP 


Print OLT start and termination messages on SYSLST 
and SYS LOG. 


Parallel 
Print 


PP(n) 
NPP 


Use the console device, in addition to SYSLST for 
OLT messages. Four levels of print are available on 
the parallel printer by entering one of these 
numbers at (n). 

0: HEADER only 

1: HEADER, DESCRIPTION and COMMENTS 

2: HEADER and RESULTS 

3: HEADER, DESCRIPTION,COMMENTS and 
RESULTS 


First error 
Communica- 
tions 


FE 
NFE 


Forces a communications interval when the first error 
is encountered. (See note 3). A message is printed in- 
dicating the test being run and the device being tes- 
ted. This is followed by the 01E105D message that 
allows you to: 

. Change the device and/or test fields. 

. Continue the test by entering 

R01, '///' or R01, '//(Option change)/'. 

. Enter any OLTEP verb. 

. Cancel OLTEP by entering 
R01, 'CANCEL'. 
There cannot be a first error communication ir a con- 
sole device is not available. 


Manua 1 
Intervention 


Ml 
NMI 


Informs the OLT section to run all manual interven- 
tion routines within the test request. (Manual Inter- 
vention and RE are mutually exclusive options) 


Remote 


RE 
NRE 


RETAIN/370 only. If RE is specified,OLTEP Fs con- 
trolled by the remote specialist, who enters N' 3 .E to 
return control to the on-site cusfcr-er engineer. 



TABLE OF OPTIONS (....Continued) 



Option 


Entry 


Description 


Trace 


TR 
NTR 


Trace all functions called by OLT.(See note 4) 


EXT= 


EXT= 


Information following this option is passed to the 
OLT section by way of a 56-byte buffer. This in- 
formation must be the last entry in the option 
field and can contain any character but a slash. 
EXAMPLE: 
R01,'181/2400C/TL,EXT= BLOCK 4FFPRINT/' 

BLOCK 4FFPRINT goes into a buffer area within 
OLTEP and then passes on to the OLT section. 


The default options are underlined. 

Note 1: The FE option overrides the TL and EL options, unless NPR is also in 
effect. However if you enter R 01,'///' or R 01 ///(option change)/' 
at a first error communications interval,the TL and EL options, if 
specified, are in effect. 

Note 2: NPR without EL and/or TL is ignored. 

Note 3: Error print and FE are ignored if no print and either EL or TL are 
specified. 

Note 4: Routine-to routine linkage is not traced. Do not attempt to use 
Trace function when SYSLST is assigned to the test device. 



EXAMPLE OF OLTEP OPERATION 



BG ossgnsys001,x'18r 

BG assgn sys002,x'182' 

BG //exec ijzadolt,real, size=NK (m 

BG E102I OLTS RUNNING 



, OLTEP is loaded into the back- 
ground partition 



limum 14K) 



BG E134I WARNING - 



DASD VOLUME LABELED CEPACK NOT 
PROTECTED FROM WRITE 



BG E1Q7I OPTIONS ARE NTL,NEL,NPP,FE,N MI,EP,CP,PR,NRE,NTR 

BG 01E105D ENTER-DEV/TEST/OPT^-— H 1 ""' 01 nmmuma rtar * interv g] 

BG r01,'181/2400a// ' ^~ 

BG El 191 NON-STANDARD TAPE LABEL 0181 



OLTEP finds a nonstandard 
labeled tape mounted on the 
test device. 



BG 04E139D REPLY B TO BYPASS, R TO RETRY, P TO PROCEED(MAY DESTROY 

DATA) 
BG r04,'p' 



BG E158I ST2400AS UNIT 0181 



r encountered 



BG E129I FIRST ERROR COMMUNICATION T2400A 001 UNIT 0181 
BG E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NRE,NTR 
BG 01E105D ENTER— DEV/TEST/OPT/ - 



BG r01,'182//nfe,tl(2)/' 

BG E158I *TT2400A$ UNIT 0181 

BG E158I ST2400AS UNIT 0182 

BG E158I TT2400AS UNIT 0182 

BG E158I ST2400AS UNIT 0182 



First error communications 
interval 



[Console interrupt key pressed | 

BG E107I OPTIONS ARE TL, NEL,NPP,NFE,NMI,EP,CP,PR,NRE,NTR 
BG 01E105D ENTER-DEV/TEST/OPT 



Interrupt communications 
interval 



BG R 01, '/2400c, e/ntl/ ' 

BG E 1581 *T T2400A $ UNIT 0182 

BG E158I ST2400CS UNIT 0182 

BG E158I TT2400CS UNIT 0182 

BG E158I ST2400E $ UNIT 0182 

BG E158I T T2400E $ UNIT 0182 

BG E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NRE,NTP. 

BG 01E105D ENTER-DEV/TEST/OPT/^^^^ 

BG r 01, 'cance l' 

BG 1I00A READY FOR COMMUNICATIONS 



Test completion 
communications intervcl 



STORAGE LAYOUT 



DOS Supervisor 



OLTEP 

Resident Area 
(nucleus) 

Transient Manager, tables, 
constants, etc. 




18 K (minimum) 

Background 

Partition 



Main Storage 
OLTEP Storage allocctlcn with RETAIN/370 Active 



/+ statement 


11-19 


/* statement 


11-19 


/& statement 


11-19 


* statement 


11-19 



Abnormal termination option table IV-70 

ACTION statement 11-21, 11-22 

ADD command 11-01, 11-02 

Address, converting virtual to real IV-92 

ALLOC 

command 11-05 

macro, supervisor II 46 
ALLOCR 

command 11-05 

macro, supervisor II 46 
ALTER command 11-05 
Anchor table IV-97 

ASCII/EBCDIC translation table IV-76 to IV 
ASSGN 

command 11-05 to 11-08 

macro, supervisor 11-49 

statement 11-05 to 11-08 
Attention routine commands 11-05 to 11-19 



Boundary box IV-91 

C 

CANCEL command 11-08 

Cancel codes and messages IV-56, IV-57 

CAT command 11-02 

Catalog 

core image library 11-23 

procedure library 11-23 

relocate library 11-23 

source statement library 11-23 
CAW (channel address word) 1-19 
CCB (command control block) IV-06 to IV-09 
CCW (channel command word) 1-19 
Channel address word (see CAW) 
Channel bucket IV-44 
Channel commands 1-22 to 1-24 
Channel command word (see CCW) 
Channel control table IV-46 
Channel logout, limited 1-20 
Channel queue table IV-43 
Channel status word (see CSW) 
CLOSE 

command 11-08 

statement 11-03 
Code translation fcble 1-03 to 1-13 



INDEX (continued) 

C (continued) 

Command control block (see CCB) 
Communication region 

partition IV-17 to IV-25 

system (SYS COM) IV- 12 to IV- 16 
Condense 

core image library 11-24 

procedure library 11-24 

relocate library 11-24 

source statement library 11-24 
Condense limit, automatic 11-24 
Condition codes 1-06, 1-07 
CONFG macro, supervisor 11-38, ||-39 
Console buffering table IV-48 
Control registers 

allocation 1-14 

assignment of fields 1-14, 1-15 

GPR masks, CR9 V-16 
Conversion 

hexadecimal to decimal 1-25 

virtual to real address IV-92 
Copy blocks 

overview IV-88 

CCB, layout of IV-89 

CCW, layout of IV-90 
Copy functions, librarian 11-27 to 11-33 
CORGZ program, functions 11-27 to 11-33 
Cross partition ECB (XECB) table IV-45 
CRT constant table IV-65 
CSERV program, functions 11-25, 11-26, 11-27 
CSW (channel status word) 1-19 



Dasd standard labels 

format 1, file 111-07 to 111-10 

format 2, file 111-11 to 111-14 

format 3, file 111-15 

format 4, file 111-16 to 111-18 

format 5, file 111-19 

volume 111-01 
DATE statement 1 1-09 
Deblock utility 

description 11-57 to 11-62 

examples 11-60, 11-61 
DEL command 11-02 
Delete 

core image library 11-23 

procedure library 11-23 

relocatable library 11-23 

source statement library 11-23 
Density data IV-11 
Device type codes H-51 to 11-53 
DIB (disk information block) IV-51, IV-52 
DIDAL 

block IV-91 

entry IV-91 
Directory entry, layout of IV-100 
Directory rearch sequences IV- 102 



INDEX (continued) 

D (continued) 

Directory versus second level directory relationship IV— 101 

Disk information block (see DIB) 

DLAB statement 11-09 

DLBL statement 11-09 

DOSVSDMP 

creating stand-alone dump program V-25 

executing stand-alone dump program V-26 

printing stand-alone dump output V-26, V-27 
DPD 

command 11-02, 11-03 

macro, supervisor 11-49 
DPDTAB (page data set table) IV- 50 
DSERV program, dunctions 11-25, 11-26 
DSPLY command 11-10 
DTF table type codes 111-106, 111-107 
DTFCD 

combined reader/punch 111-32 

punch 111-30, 111-31 

reader 111-28, 111-29 
DTFCN 111-35 
DTFCP 

DISK^NO 111-102, 111-103 

DISK=parameter omitted 111-104, 111-105 

DISK=YES 111-99 to 111-101 
DTFDA 111-60 to 111-64 
DTFDI 111-97, 111-98 
DTFDR 111-36 
DTFDU 111-89, 111-90 
DTF IS 

add 111-69 to 111-74 

addrtr 111-82 to 111-88 

load 111-65 to 111-68 

retrve, random 111-75 to 111-78 

retrve, sequential 111-79 to 111-82 
DTFMR 111-39 to 111-41 
DTFMT 

data files 111-42 to 111-49 

work files 111-50 
DTFOR 111-37 to 111-38 
DTFPH 

DAM-files 111-94 

diskette 111-95, 111-96 

magnetic tape 111-91 

sequential disk 111-92, 111-93 
DTFPR 111-33, 111-34 
DTFSD 

data files 111-51 to 111-57 

work files 111-58, 111-59 
DUMP command 11-10 
DUMPGEN 

options V-20, V-21 

control statements V-21, V-22 

messages V-22 

stand-abr.e durns program V-23, V-24 
DVCDN cc— c-d !I— TO 
DVCGEN -;-;, ;.^-,izr 11-47, 11-48 
DVCUP cc-r-e-rf --:3 



INDEX (continued) 

E 

ECB (event control block) IV- 10 
END 

card, format 11-55 

command 11-10 
ENDSD command 11-10 
ENTER command 11-10 
ENTRY statement 11-21 

ERPIB (error recovery procedure information block) IV-54 
Error recovery block (ERBLOC) IV-55 
Error recovery procedure information block (see ERPIB) 
Error queue entry IV-55 
ESD card, format 11-54 
ESERV program 

control statements 11-34, 11-35 

examples 11-36 
Event control block (see ECB) 
EXEC command 11-11 
EXTENT 

command 11-11 

statement 11-11 



Fetch table IV-99 

File labels, standard 

dasd (see dasd standard labels) 
tape (see tape standard labels) 

FOPT macro, supervisor 11-40 to 11-44 



Headqueue PUB table IV-40 
HOLD command 11-11 



I 



IGNORE command 11-11 
INCLUDE statement 11-20, 11-21 
Instruction code 

assembler 1-05 

extended mnemonic 1-04 

format 1-13 

machine 1-01 to 1-04 
Interruption code 

external 1-21 

input/output (I/O) 1-22 

machine check 1-20, 1-21 

program 1-21 

supervisor call 1-22 
Interval timer option table IV-68 
Interval timer request table IV-69 
IOTAB macro, supervisor 11-46, 11-47 
I/O tables interrelationship IV-35 
IPL control statements 11-01 to 11-04 



INDEX (continued) 

J 

JIB (job information block) IV-41, IV-42 

Job accounting interface common table IV-72, IV-73 

Job accounting interface partition table IV-74, IV-75 

Job control statements/commands 11-05 to 11-19 

Job information block (see JIB) 

JOB statement 11-12 

K 



Label information cylinder 111-20 
Labels, standard 

dasd (see dasd standard labels) 

tape (see tape standard labels) 
LBLTYP statement 11-12 
LFCB command 11-12 
Librarian 

maintenance function 11-23 to 11-25 

service functions 11-25 to 11-27 

copy functions 11-27 to 11-33 
LIK (logical transient owner identification key) IV-26 
Line mode table IV-49 

Linkage editor control statements 11-20 to 11-22 
LIOCS module-names versus options 

CDMOD 111-21, 111-22 

DAMOD 111-22 

DIMOD 111-22 

DRMOD 111-22 

DUMOD 111-22 

ISMOD 111-27 

MRMOD 111-23 

MTMOD 111-23 

ORMOD 111-24 

PRMOD 111-24, 111-25 

PTMOD 111-26 

SDMOD 111-26, 111-27 
LISTIO 

command 11-12 

statement 11-12 
LOG command 11-12 
Logical transient key (see LTK) 
Logical transient owner identification key (see LIK) 
Logical unit block (see LUB) 
LTK (logical transient key) IV-26 
LUB (logical unit block) IV-36 
LUCB command 11-12 

M 

MAINT program, factions 11-23 to 11-25 
MAP command 11-12 

Merge function, I-=-=--=n 11-31 to 11-33 
MICR DTF «:=-«:?« ;-c "-.-ers IV-53 
MODE comrrc-f :' -'.7 , -'-2 



INDEX (continued) 



M (continued) 

Module names (see LlOCS module names versus options) 

MSG command 11-13 

MTC 

command 11-13 

statement 11-13 

N 

NEWVOL command 11-13 
NOLOG command 11-13 



OLTEP 

requirements V-31 

options V-32, V-33 

example V-34 
Operator communication option table IV-67 
OPTION statement 11-13 to 11-15 
Option tables 

AB (abnormal termination) IV-70 

IT (interval timer) IV-68 

OC (operator communication) IV-67 

PC (program check) IV-66 

PHO (page fault handling overlap) 1V-71 
OVEND 

command 11-15 

statement 11-15 



Page data set dump 

description V-17, V-18 

examples V-18 

termination V-19 
Page data set format 

2314 IV-98 

3330 IV-93 

3340 IV-93 
Page data set table (see DPDTAB) 
Page fault handling option table IV-71 
Page frame table IV-83 
Page queue table IV-82 
Page table IV-81 
PAGETAB IV-84 

Partition identification key (see PIK) 
Partition communication region IV-17 to IV-25 
PAUSE 

command 11-15 

statement 11-15 
PDAID program 

functions 

I/O trace V-02, V-03 
F/L trace V-03, V-04 
GSVC trace V-04 
QTAM trace V-05 



INDEX (continued) 

P (continued) 

PDAID program (continued) 
functions (continued) 
VTAM trace V-06 
VTAM BUFFER pool trace V-07 
TD (transient dump) V-08 
initialization V-01 
system generation requirements V-01 
termination V-02 

utility program, tape to printer V-03 
PDZAP 

system requirements V-28 
executing PDZAP V-28, V-29, V-30 
PHASE statement 11-20 
Physical unit block (see PUB) 
Physical unit block ownership table IV-39 
PIB (program information block) IV-29 to IV-32 
PIK (partition identification key) IV-26 
PIOCS macro, supervisor 11-44, 11-45 
Program check option table IV-66 
Program information block (see PIB) 
Program information block extension IV-33 
Program status word (see PSW) 
PRTY command 11-15 
PSERV program, functions 11-26, 11-27 
PSW 1-18 

PUB (physical unit block) IV-37, IV-38 
PUB2 table 

accessing the IV-58 
entry formats 
dasd IV-59 
tape IV-60, IV-61 

unit record and unsupported devices IV-59 
3540 diskette IV-62 
3886 OCR IV-61 



Queue headers, selection pool IV-85 

R 

RAS linkage area IV-27 

RCB (resource control block) IV-10 

Reallocation function, librarian 11-24, 11-25 

Recorder file table (see RF-table) 

Rename 

core image library 11-23 

procedure library 11-24 

relocatable library 11-24 

source statement library 11-24 
REP card, format H-55, 11-56 
REPLICA block IV-91 
RESET 

cc--~.: I!- 15 



INDEX (continued) 

R (continued) 

Resource control block (see RCB) 

Resource usage record table (see RURTAB) 

RF -table (recorder file table) IV-63, IV-64 

RID IV-104 

RLD card, format 11-54, 11-55 

ROD command 11-15 

Routine identifiers (see RID) 

RPS 

DTF/module relationship 111-108 

DTF extention layout 111-109 
RSERV program, functions 11-25, 11-26, 11-27 
RSTRT statement 11-15 
RURTAB (resource usage record table) IV-95, IV-96 



SAB (seek address block) IV-50 
Save area 

problem program 1V-34 

user IV-34 
SDAID program 

changing parameters V-15 

functions 

dedicated events V-10 
elementary events V-09 

initialization V-12 to V-14 

output 

dedicated events V-10 
elementary events V-ll 

requirements V-09 

restrictions V-09 

termination V-16 
Second level directory 

directory relationship IV— 101 

format IV-101 
Seek address block (see SAB) 
Segment table IV-81 
Selection pool identifiers IV-85 
SEND macro, supervisor 11-49 
Sense bytes 

1017 1-26 

1018 1-26 

1287 1-26 

1288 1-27 
1403 1-27, 1-28 
1419 1-28 

1442 1-28 

1443 1-29 
2260 1-29 
2311 1-29, 1-30 
2314/ 

2319 1-30, 1-31 
2321 1-31, 1-32 
2400 1-32, 1-33 
2495 1-33 



INDEX (continued) 
S (continued) 

Sense bytes (continued) 



2501 


1-34 


2520 


1-34 


2540 


1-34 


2560 


1-34 to 1-36 


2596 


1-36 


2671 


1-36 


3203 


1-37 


3210/ 




3215 


1-37 


3211 


1-38 


3272 


1-38 


3330 


1-38, 1-39 


3340 


1-40, 1-41 


3410/ 




3411 


1-41, 1-42 


3420/ 




3803 


1-42 to 1-45 


3504/ 




3505/ 




3525 


1-46 


3540 


1-46 


3881 


1-47 


3886 


1-47 


5203 


1-47, 1-48 


5425 


|_48, 1-49 


DOC 


1-50 


Service functk 


>ns, librarian 11-25 to 11-27 


SET 




ipl corr 


imand 11-03, 11-04 



job control command 11-15, 11-16 
Shared virtual area (see SVA) 
SSERV program, functions 11-25, 11-26, 11-27 
START command 11-16 
STDJC macro, supervisor 11-39, 11-40 
STOP command 11-16 
Storage assignment, permanent 1-16, 1-17 
Supervisor call codes IV-02 to IV-05 
Supervisor macros 11-37 to 11-50 
Supervisor storage allocation IV-01 
SUPVR macro, supervisor 11-37, 11-38 
SVA (shared virtual area), layout of IV-98 
SYSCOM (system communication region) IV-12 to IV-16 
System task blocks IV-28 



Tape error block (see TEB) 

Tape standard labels 

file (ASCII) 111-05, 111-06 
f?!e (EBCDIC} 111-03, 111-04 
voL—e ASGP 111-02 
volurrve 'IIZD'.C) 111-01 

Task interrupt key s;e T '<} 



INDEX (continued) 

T (continued) 

TCB (translation control block) IV-86, IV-87 

TEB (tape error block) IV-48 

TIK (task interrupt key) IV-26 

TLBL statement 11-16, 11-17 

TPBAL command 11-17 

TPLAB statement 11-17 

Track hold table IV-47 

Translation control block (see TCB) 

TXT card, format 11-54 

U 

UCS command 11-17 

UN PATCH command 11-17 

Update, source statement library 11-24 

UPSI statement 11-17 



Virtual to real address, c 

VOL statement 11-17 

Volume labels, standard 

dasd (see dasd standard labels) 
tape (see tape standard labels) 

VSTAB macro, supervisor 11-45 

VTAM address vector table IV-103 

W 



XTENT statement 11-18 

Y 

Z 

ZONE statement 11-19 
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